| line |
true |
false |
branch |
|
18
|
1 |
26 |
if (defined $_[-1] and ref $_[-1] eq "ARRAY") |
|
26
|
26 |
1 |
unless defined $package |
|
36
|
27 |
1 |
if defined $_ |
|
39
|
0 |
27 |
unless $pm |
|
59
|
24 |
3 |
if ($txtfn) { } |
|
|
3 |
0 |
elsif (-d "$incroot/../ffi") { } |
|
63
|
0 |
24 |
unless open $fh, "<", $txtfn |
|
66
|
24 |
0 |
$line =~ /^FFI::Build\@(.*)$/ ? : |
|
70
|
0 |
24 |
unless -f $lib |
|
91
|
0 |
3 |
if ($error) { } |
|
108
|
0 |
27 |
unless my $handle = FFI::Platypus::DL::dlopen($lib, 1) |
|
115
|
1 |
26 |
if (my $init = eval {
do {
$self->function("ffi_pl_bundle_init", ["string", "sint32", "opaque[]"], "void")
}
}) |
|
120
|
1 |
26 |
if (my $init = eval {
do {
$self->function("ffi_pl_bundle_constant", ["string", "opaque"], "void")
}
}) |
|
127
|
1 |
26 |
if (my $address = $self->find_symbol("ffi_pl_bundle_fini")) |