| line |
true |
false |
branch |
|
53
|
6 |
0 |
unless defined $callback |
|
59
|
0 |
6 |
if $n != $nrec |
|
83
|
3 |
2 |
if (defined $$file{'toc'}{'DSDB'}) { } |
|
105
|
3 |
5 |
if (@children) { } |
|
123
|
6 |
54 |
if (@children) { } |
|
139
|
0 |
8 |
unless @children == 1 + @$recs |
|
141
|
0 |
5 |
unless 0 == @$recs |
|
163
|
5 |
3 |
if $sum <= $max |
|
177
|
3 |
52 |
if $n >= @sizes |
|
191
|
61 |
0 |
if ($testpoint) |
|
207
|
6 |
55 |
if (defined $pointers) { } |
|
208
|
0 |
6 |
unless @$values + 1 == @$pointers |
|
226
|
6 |
52 |
if ($block->read(4, 'N') != 0) |
|
241
|
18 |
109 |
if ($pointer > 0) { } |
|
263
|
109 |
12 |
if (not $pointers) { } |
|
272
|
0 |
12 |
unless 1 + @vals == @ps |
|
281
|
60 |
61 |
if ($testpoint) |
|
305
|
1 |
0 |
unless (ref $file) |
|
308
|
0 |
1 |
unless $file |
|
311
|
0 |
1 |
if ((stat $file)[7] > 32) { } |
|
349
|
5 |
11 |
if ($recordType =~ /^....$/) { } |
|
|
1 |
10 |
elsif ($recordType =~ /^(....)_hex$/) { } |
|
359
|
1 |
9 |
unless $mkr |
|
450
|
0 |
627 |
if @opts |
|
467
|
0 |
627 |
unless defined $value |
|
469
|
1 |
626 |
unless defined $$self[2] |
|
473
|
623 |
3 |
if ($t eq 'blob' or $t eq 'ustr') { } |
|
|
3 |
0 |
elsif ($t eq 'bool' or $t eq 'shor' or $t eq 'long') { } |
|
|
0 |
0 |
elsif ($t eq 'type') { } |
|
479
|
0 |
0 |
unless length $value == 4 |
|
498
|
3 |
1303 |
if ($strucType eq 'bool') { } |
|
|
3 |
1300 |
elsif ($strucType eq 'long' or $strucType eq 'shor') { } |
|
|
18 |
1282 |
elsif ($strucType eq 'blob') { } |
|
|
1282 |
0 |
elsif ($strucType eq 'ustr') { } |
|
|
0 |
0 |
elsif ($strucType eq 'type') { } |
|
|
0 |
0 |
elsif ($strucType eq 'comp' or $strucType eq 'dutc') { } |
|
539
|
1 |
675 |
if ($strucType eq 'long' or $strucType eq 'shor' or $strucType eq 'type') { } |
|
|
1 |
674 |
elsif ($strucType eq 'bool') { } |
|
|
6 |
668 |
elsif ($strucType eq 'blob') { } |
|
|
668 |
0 |
elsif ($strucType eq 'ustr') { } |
|
|
0 |
0 |
elsif ($strucType eq 'comp' or $strucType eq 'dutc') { } |
|
566
|
3 |
1254 |
if ($strucType eq 'long' or $strucType eq 'shor') { } |
|
|
3 |
1251 |
elsif ($strucType eq 'bool') { } |
|
|
18 |
1233 |
elsif ($strucType eq 'blob') { } |
|
|
1233 |
0 |
elsif ($strucType eq 'ustr') { } |
|
|
0 |
0 |
elsif ($strucType eq 'type') { } |
|
|
0 |
0 |
elsif ($strucType eq 'comp' or $strucType eq 'dutc') { } |
|
604
|
21 |
1359 |
unless lc $$self[0] cmp lc $$other[0] |
|
626
|
3 |
1 |
if ($color =~ /^\#([0-9a-f]+)$/i) |
|
627
|
1 |
2 |
if (length $1 == 3) { } |
|
|
1 |
1 |
elsif (length $1 == 6) { } |
|
|
1 |
0 |
elsif (length $1 == 12) { } |
|
636
|
1 |
3 |
unless $rgb |
|
650
|
0 |
0 |
unless (ref $image) |
|
679
|
0 |
4 |
unless ref $values |
|
682
|
1 |
3 |
unless $reqcount <= @$values |
|
687
|
1 |
2 |
if $max < @$values |
|
691
|
2 |
0 |
if ($max > @fields) |
|
709
|
0 |
0 |
unless 7 == @$flds |