| line |
true |
false |
branch |
|
89
|
23 |
3 |
if ($export_mode eq 'OK') { } |
|
|
0 |
3 |
elsif ($export_mode) { } |
|
109
|
0 |
18 |
if @fragments |
|
130
|
18 |
0 |
if ($params{'local'}) { } |
|
176
|
1 |
8 |
if (my $symbol = $args{'ifdef'}) |
|
182
|
1 |
8 |
unless defined $result |
|
271
|
19 |
1 |
if $argindex > $wasindex |
|
274
|
1 |
9 |
if $params{'ifdef'} |
|
282
|
1 |
9 |
if $params{'ifdef'} |
|
286
|
1 |
9 |
unless defined $result |
|
304
|
2 |
7 |
if ($curpos < $sizeof) |
|
309
|
1 |
8 |
if ($with_tail) |
|
314
|
9 |
0 |
unless $done_carp |
|
317
|
8 |
1 |
if ($arg_style eq 'list') { } |
|
|
1 |
0 |
elsif ($arg_style eq 'hashref') { } |
|
318
|
1 |
7 |
$with_tail ? : |
|
327
|
0 |
1 |
$with_tail ? : |
|
344
|
1 |
8 |
$no_length_check ? : |
|
418
|
0 |
17 |
unless my($member, $offs, $size, $sign) = $def =~ /^([\w.]+)@(\d+)\+(\d+)([us])$/ |
|
421
|
0 |
17 |
unless $member eq $membername |
|
424
|
0 |
17 |
if ($offs > $_[1]) { } |
|
|
0 |
17 |
elsif ($offs < $_[1]) { } |
|
434
|
17 |
0 |
if (exists $struct_formats{"$size$sign"}) { } |
|
|
0 |
0 |
elsif ($size == 8 and $sign eq 'u') { } |
|
440
|
0 |
0 |
unless ($done_u64) |
|
505
|
0 |
2 |
unless my($member, $offs, $size) = $def =~ /^([\w.]+)@(\d+)\+(\d+)$/ |
|
508
|
0 |
2 |
unless $member eq $membername |
|
511
|
0 |
2 |
if ($offs > $_[1]) { } |
|
|
0 |
2 |
elsif ($offs < $_[1]) { } |
|
552
|
0 |
1 |
unless my($member) = $def =~ /^([\w.]+)@/ |
|
608
|
0 |
18 |
unless @fragments |
|
622
|
0 |
18 |
unless defined $modulename |
|
628
|
0 |
18 |
unless open my $source_fh, "> $sourcename" |
|
636
|
0 |
18 |
unless (defined $objname) |
|
644
|
0 |
18 |
unless (defined $exename) |
|
650
|
0 |
18 |
unless open my $runh, "./$exename |" |
|
671
|
0 |
18 |
if (@exports) |
|
676
|
13 |
5 |
if (@exports_ok) |
|
724
|
0 |
0 |
unless open my $outfile, '>', $filename |
|
759
|
1 |
0 |
if (defined $value) { } |