| line |
true |
false |
branch |
|
84
|
21 |
3 |
if ($export_mode eq 'OK') { } |
|
|
0 |
3 |
elsif ($export_mode) { } |
|
104
|
0 |
16 |
if @fragments |
|
125
|
16 |
0 |
if ($params{'local'}) { } |
|
171
|
1 |
6 |
if (my $symbol = $args{'ifdef'}) |
|
177
|
1 |
6 |
unless defined $result |
|
265
|
19 |
1 |
if $argindex > $wasindex |
|
268
|
1 |
9 |
if $params{'ifdef'} |
|
276
|
1 |
9 |
if $params{'ifdef'} |
|
280
|
1 |
9 |
unless defined $result |
|
298
|
2 |
7 |
if ($curpos < $sizeof) |
|
303
|
1 |
8 |
if ($with_tail) |
|
308
|
9 |
0 |
unless $done_carp |
|
311
|
8 |
1 |
if ($arg_style eq 'list') { } |
|
|
1 |
0 |
elsif ($arg_style eq 'hashref') { } |
|
312
|
1 |
7 |
$with_tail ? : |
|
321
|
0 |
1 |
$with_tail ? : |
|
338
|
1 |
8 |
$no_length_check ? : |
|
412
|
0 |
17 |
unless my($member, $offs, $size, $sign) = $def =~ /^([\w.]+)@(\d+)\+(\d+)([us])$/ |
|
415
|
0 |
17 |
unless $member eq $membername |
|
418
|
0 |
17 |
if ($offs > $_[1]) { } |
|
|
0 |
17 |
elsif ($offs < $_[1]) { } |
|
428
|
17 |
0 |
if (exists $struct_formats{"$size$sign"}) { } |
|
|
0 |
0 |
elsif ($size == 8 and $sign eq 'u') { } |
|
434
|
0 |
0 |
unless ($done_u64) |
|
499
|
0 |
2 |
unless my($member, $offs, $size) = $def =~ /^([\w.]+)@(\d+)\+(\d+)$/ |
|
502
|
0 |
2 |
unless $member eq $membername |
|
505
|
0 |
2 |
if ($offs > $_[1]) { } |
|
|
0 |
2 |
elsif ($offs < $_[1]) { } |
|
546
|
0 |
1 |
unless my($member) = $def =~ /^([\w.]+)@/ |
|
602
|
0 |
16 |
unless @fragments |
|
616
|
0 |
16 |
unless defined $modulename |
|
622
|
0 |
16 |
unless open my $source_fh, "> $sourcename" |
|
630
|
0 |
16 |
unless (defined $objname) |
|
638
|
0 |
16 |
unless (defined $exename) |
|
644
|
0 |
16 |
unless open my $runh, "./$exename |" |
|
665
|
0 |
16 |
if (@exports) |
|
670
|
11 |
5 |
if (@exports_ok) |
|
718
|
0 |
0 |
unless open my $outfile, '>', $filename |