| line |
true |
false |
branch |
|
23
|
0 |
134 |
unless length $data == $len |
|
30
|
0 |
28 |
unless defined $c |
|
37
|
0 |
7 |
unless length $str == 2 |
|
49
|
0 |
2 |
unless defined $c |
|
56
|
0 |
32 |
unless length $str == 4 |
|
65
|
0 |
5 |
unless length $str == 4 |
|
74
|
0 |
0 |
unless length $str == 4 |
|
83
|
0 |
17 |
unless length $str == 4 |
|
92
|
0 |
48 |
unless length $str == 4 |
|
101
|
0 |
10 |
unless length $str == 4 |
|
110
|
0 |
0 |
unless length $str == 4 |
|
123
|
0 |
15 |
unless defined $c |
|
133
|
1 |
2 |
if ($len) { } |
|
135
|
0 |
1 |
unless length $str == $len |
|
149
|
0 |
2 |
unless defined $c |
|
159
|
0 |
0 |
unless defined $c |
|
175
|
0 |
9 |
unless length $str == 8 |
|
179
|
1 |
8 |
$i > 8 ? : |
|
184
|
0 |
9 |
$B::Disassembler::ivsize == 4 ? : |
|
190
|
0 |
0 |
$B::Disassembler::ptrsize == 8 ? : |
|
197
|
0 |
0 |
if ($B::Disassembler::longsize) { } |
|
198
|
0 |
0 |
$B::Disassembler::longsize == 8 ? : |
|
201
|
0 |
0 |
$B::Disassembler::ivsize == 8 ? : |
|
208
|
3 |
0 |
if ($B::Disassembler::blversion ge '"0.07"') |
|
209
|
3 |
0 |
if ($B::Disassembler::perlversion ge '"5.013"') |
|
228
|
0 |
1 |
if ($] < 5.009) { } |
|
261
|
0 |
1 |
if ($str eq '#! ') { } |
|
269
|
0 |
1 |
if $magic != 1128418384 |
|
274
|
1 |
0 |
if ($blversion ge '"0.06_03"') |
|
277
|
1 |
0 |
if ($blversion gt '"0.06"' or $blversion eq '"0.04"') |
|
280
|
1 |
0 |
if ($blversion ge '"0.06_05"') |
|
283
|
1 |
0 |
if ($blversion ge '"0.06_06"') |
|
294
|
0 |
0 |
if (wantarray) { } |
|
308
|
0 |
0 |
if defined $$_ |
|
316
|
0 |
0 |
unless $comment |
|
317
|
0 |
0 |
if (defined $arg) { } |
|
319
|
0 |
0 |
if ($insn eq 'newopx' or $insn eq 'ldop' and $] > 5.007) { } |
|
|
0 |
0 |
elsif (not $comment) { } |
|
|
0 |
0 |
elsif ($insn eq 'comment') { } |
|
|
0 |
0 |
elsif ($insn eq 'stpv') { } |
|
|
0 |
0 |
elsif ($insn eq 'newsvx') { } |
|
|
0 |
0 |
elsif ($insn eq 'newpadlx') { } |
|
|
0 |
0 |
elsif ($insn eq 'newpadnlx') { } |
|
|
0 |
0 |
elsif ($insn eq 'newpadnx') { } |
|
|
0 |
0 |
elsif ($insn eq 'gv_stashpvx') { } |
|
|
0 |
0 |
elsif ($insn eq 'ldspecsvx') { } |
|
|
0 |
0 |
elsif ($insn eq 'ldsv') { } |
|
|
0 |
0 |
elsif ($insn eq 'gv_fetchpvx') { } |
|
|
0 |
0 |
elsif ($insn eq 'sv_magic') { } |
|
|
0 |
0 |
elsif ($insn =~ /_flags/) { } |
|
|
0 |
0 |
elsif ($comment and $insn eq 'op_private') { } |
|
|
0 |
0 |
elsif ($insn eq 'op_type' and $] < 5.007) { } |
|
322
|
0 |
0 |
if $comment |
|
331
|
0 |
0 |
if $comment ne '1' |
|
334
|
0 |
0 |
if $comment ne '1' |
|
340
|
0 |
0 |
if $comment ne '1' |
|
344
|
0 |
0 |
if $comment ne '1' |
|
348
|
0 |
0 |
if $comment ne '1' |
|
352
|
0 |
0 |
if $comment ne '1' |
|
356
|
0 |
0 |
if $comment ne '1' |
|
361
|
0 |
0 |
if $comment ne '1' |
|
365
|
0 |
0 |
if $comment ne '1' |
|
369
|
0 |
0 |
if $comment ne '1' |
|
377
|
0 |
0 |
if $comment |
|
378
|
0 |
0 |
if $insn eq 'op_flags' and $comment |
|
390
|
0 |
0 |
if $comment ne '1' |
|
395
|
0 |
0 |
if $comment ne '1' |
|
402
|
0 |
0 |
if (defined $arg) { } |
|
418
|
0 |
1 |
if ($verbose) |
|
424
|
0 |
0 |
if $byteorder |
|
425
|
0 |
0 |
if $longsize |
|
426
|
0 |
0 |
if defined $archflag |
|
427
|
0 |
0 |
if $perlversion |
|
433
|
0 |
179 |
if (not defined $insn or $insn eq 'unused') |
|
440
|
169 |
10 |
if (defined $arg) { } |