| line |
true |
false |
branch |
|
38
|
149 |
0 |
is_not_null($Acme::Perl::VM::PP::PL_op->sv) ? : |
|
49
|
3 |
5 |
if ($Acme::Perl::VM::PP::PL_op->private & 128) { } |
|
61
|
0 |
0 |
if ($hv->class ne 'HV') |
|
67
|
0 |
0 |
if ($gimme == 1) { } |
|
|
0 |
0 |
elsif ($gimme == 2) { } |
|
72
|
0 |
0 |
if ($Acme::Perl::VM::PP::PL_op->flags & 32 or LVRET) |
|
83
|
0 |
0 |
if ($Acme::Perl::VM::PP::PL_op->name eq 'keys') { } |
|
|
0 |
0 |
elsif ($Acme::Perl::VM::PP::PL_op->name eq 'values') { } |
|
95
|
0 |
0 |
if $dokeys |
|
96
|
0 |
0 |
if $dovalues |
|
104
|
1 |
2 |
if ($sv->ROK) |
|
108
|
0 |
3 |
if ($sv->class ne 'GV') |
|
112
|
0 |
3 |
if ($Acme::Perl::VM::PP::PL_op->private & 128) |
|
124
|
0 |
0 |
if ($sv->ROK) { } |
|
125
|
0 |
0 |
unless (is_scalar($sv)) |
|
130
|
0 |
0 |
if ($sv->class ne 'GV') |
|
136
|
0 |
0 |
if ($Acme::Perl::VM::PP::PL_op->flags & 32) |
|
137
|
0 |
0 |
if ($Acme::Perl::VM::PP::PL_op->private & 128) { } |
|
|
0 |
0 |
elsif ($Acme::Perl::VM::PP::PL_op->private & 96) { } |
|
138
|
0 |
0 |
if ($Acme::Perl::VM::PP::PL_op->first->name eq 'null') { } |
|
159
|
12 |
2 |
if ($Acme::Perl::VM::PP::PL_op->name eq 'rv2av') { } |
|
171
|
0 |
14 |
if ($sv->ROK) { } |
|
174
|
0 |
0 |
if ($sv->class ne $class) |
|
177
|
0 |
0 |
if ($Acme::Perl::VM::PP::PL_op->flags & 16) { } |
|
|
0 |
0 |
elsif (LVRET) { } |
|
|
0 |
0 |
elsif ($Acme::Perl::VM::PP::PL_op->flags & 32 and $Acme::Perl::VM::PP::PL_op->private & 128) { } |
|
190
|
1 |
13 |
if ($sv->class eq $class) { } |
|
191
|
0 |
1 |
if ($Acme::Perl::VM::PP::PL_op->flags & 16) { } |
|
|
0 |
1 |
elsif (LVRET) { } |
|
200
|
0 |
13 |
if ($sv->class ne 'GV') |
|
204
|
2 |
11 |
if ($Acme::Perl::VM::PP::PL_op->private & 128) { } |
|
211
|
4 |
9 |
if ($Acme::Perl::VM::PP::PL_op->flags & 16) { } |
|
|
0 |
9 |
elsif (LVRET) { } |
|
221
|
10 |
0 |
if ($class eq 'AV') { } |
|
222
|
8 |
2 |
if ($gimme == 3) { } |
|
|
2 |
0 |
elsif ($gimme == 2) { } |
|
231
|
0 |
0 |
if ($gimme == 3) { } |
|
|
0 |
0 |
elsif ($gimme == 2) { } |
|
249
|
66 |
47 |
if ($Acme::Perl::VM::PP::PL_op->flags & 32) |
|
250
|
21 |
45 |
if (($Acme::Perl::VM::PP::PL_op->private & 144) == 128) |
|
260
|
1 |
0 |
if (($Acme::Perl::VM::PP::PL_op->private & 144) == 128) |
|
263
|
0 |
1 |
if ($Acme::Perl::VM::PP::PL_op->flags & 16) { } |
|
|
0 |
1 |
elsif (LVRET) { } |
|
272
|
0 |
1 |
if ($gimme == 3) { } |
|
|
1 |
0 |
elsif ($gimme == 2) { } |
|
287
|
1 |
0 |
if (($Acme::Perl::VM::PP::PL_op->private & 144) == 128) |
|
293
|
0 |
1 |
if ($Acme::Perl::VM::PP::PL_op->flags & 16) { } |
|
|
0 |
1 |
elsif (LVRET) { } |
|
301
|
0 |
1 |
if ($gimme == 3) { } |
|
|
1 |
0 |
elsif ($gimme == 2) { } |
|
315
|
4 |
0 |
if ($Acme::Perl::VM::PP::PL_op->flags & 128) { } |
|
332
|
5 |
0 |
if ($mark < $#Acme::Perl::VM::PP::PL_stack) { } |
|
341
|
4 |
0 |
if ($Acme::Perl::VM::PP::PL_op->flags & 128) { } |
|
354
|
0 |
1 |
if ($sv->class eq 'PVLV') |
|
367
|
0 |
0 |
if (GIMME_V == 3) { } |
|
373
|
0 |
0 |
if (++$mark <= $#Acme::Perl::VM::PP::PL_stack) { } |
|
387
|
2 |
3 |
if (GIMME_V != 3) |
|
388
|
2 |
0 |
if (++$mark <= $#Acme::Perl::VM::PP::PL_stack) { } |
|
406
|
0 |
14 |
unless (sv_defined($sv)) |
|
417
|
0 |
14 |
unless ($code) |
|
427
|
0 |
0 |
if ($sv->ROK) |
|
428
|
0 |
0 |
if ($sv->RV->class eq 'CV') |
|
438
|
14 |
0 |
is_not_null($Acme::Perl::VM::PP::PL_op->sv) ? : |
|
448
|
0 |
134 |
if (is_null($cv)) |
|
459
|
131 |
3 |
if (not cv_external($cv)) { } |
|
472
|
21 |
110 |
if ($hasargs) |
|
490
|
0 |
3 |
if ($gimme == 2) { } |
|
|
0 |
3 |
elsif ($gimme == 3) { } |
|
510
|
40 |
69 |
if ($gimme == 2) { } |
|
|
53 |
16 |
elsif ($gimme == 3) { } |
|
513
|
40 |
0 |
if ($mark <= $#Acme::Perl::VM::PP::PL_stack) { } |
|
541
|
0 |
7 |
if ($cxix < 0) |
|
545
|
6 |
1 |
if ($cxix < $#Acme::Perl::VM::PP::PL_cxstack) |
|
553
|
7 |
0 |
if ($cx->type eq 'SUB') { } |
|
563
|
1 |
6 |
if ($gimme == 2) { } |
|
|
6 |
0 |
elsif ($gimme == 3) { } |
|
564
|
1 |
0 |
if ($mark < $#Acme::Perl::VM::PP::PL_stack) { } |
|
580
|
7 |
0 |
if ($popsub2) |
|
590
|
17 |
0 |
if ($gimme == -1) |
|
591
|
17 |
0 |
if (@Acme::Perl::VM::PP::PL_cxstack) { } |
|
614
|
11 |
0 |
if ($gimme == -1) |
|
615
|
11 |
0 |
if (@Acme::Perl::VM::PP::PL_cxstack) { } |
|
623
|
3 |
8 |
if ($gimme == 1) { } |
|
|
2 |
6 |
elsif ($gimme == 2) { } |
|
628
|
2 |
0 |
if ($mark <= $#Acme::Perl::VM::PP::PL_stack) { } |
|
671
|
1 |
4 |
if ($gimme == 2) { } |
|
|
3 |
1 |
elsif ($gimme == 3) { } |
|
672
|
1 |
0 |
if ($mark < $#Acme::Perl::VM::PP::PL_stack) { } |
|
711
|
2 |
0 |
if ($Acme::Perl::VM::PP::PL_op->targ) { } |
|
750
|
2 |
0 |
if ($Acme::Perl::VM::PP::PL_op->flags & 64) { } |
|
752
|
2 |
0 |
if ($iterary->class ne 'AV') { } |
|
755
|
2 |
0 |
if (_range_is_numeric($sv, $right)) { } |
|
767
|
0 |
0 |
if ($Acme::Perl::VM::PP::PL_op->private & 4) { } |
|
782
|
0 |
0 |
if ($Acme::Perl::VM::PP::PL_op->private & 4) { } |
|
798
|
22 |
0 |
if (ref $iterary ne 'ARRAY') |
|
799
|
0 |
22 |
if (my $cur = $cx->iterlval) |
|
804
|
2 |
20 |
if ($cx->iterix > $cx->itermax) |
|
817
|
0 |
0 |
if ($Acme::Perl::VM::PP::PL_op->private & 4) { } |
|
818
|
0 |
0 |
if ($cx->iterix <= $cx->itermax) |
|
825
|
0 |
0 |
$iterary == \@Acme::Perl::VM::PP::PL_stack ? : |
|
826
|
0 |
0 |
if ($cx->iterix >= $max) |
|
854
|
0 |
0 |
if (GIMME_V == 2) |
|
863
|
0 |
0 |
if ($Acme::Perl::VM::PP::PL_op->flags & 128) { } |
|
865
|
0 |
0 |
if ($cxix < 0) |
|
871
|
0 |
0 |
if ($cxix < 0) |
|
881
|
0 |
0 |
if ($cxix < $#Acme::Perl::VM::PP::PL_cxstack) |
|
891
|
0 |
0 |
if ($type eq 'LOOP') { } |
|
|
0 |
0 |
elsif ($type eq 'SUB') { } |
|
903
|
0 |
0 |
if ($gimme == 2) { } |
|
|
0 |
0 |
elsif ($gimme == 2) { } |
|
904
|
0 |
0 |
if ($mark < $#Acme::Perl::VM::PP::PL_stack) { } |
|
919
|
0 |
0 |
if ($type eq 'LOOP') { } |
|
|
0 |
0 |
elsif ($type eq 'SUB') { } |
|
931
|
0 |
0 |
if ($cxix < $#Acme::Perl::VM::PP::PL_cxstack) |
|
945
|
0 |
0 |
if ($op->name eq 'enter') |
|
950
|
0 |
0 |
if ($cxix < $#Acme::Perl::VM::PP::PL_cxstack) |
|
967
|
1 |
30 |
if ($Acme::Perl::VM::PP::PL_op->private & 64) |
|
984
|
0 |
9 |
if ($Acme::Perl::VM::PP::PL_op->private & 64) |
|
1002
|
2 |
13 |
if ($sv->class eq 'AV') { } |
|
|
1 |
12 |
elsif ($sv->class eq 'HV') { } |
|
1022
|
0 |
1 |
if ($r_elem == $last_r_elem) |
|
1028
|
6 |
6 |
if ($$sv == ${sv_undef();}) { } |
|
|
6 |
0 |
elsif ($r_elem <= $last_r_elem) { } |
|
1029
|
6 |
0 |
if ($r_elem <= $last_r_elem) |
|
1040
|
8 |
1 |
if ($gimme == 1) { } |
|
|
0 |
1 |
elsif ($gimme == 2) { } |
|
1050
|
0 |
1 |
$l_elem <= $last_l_elem ? : |
|
1053
|
1 |
0 |
if ($ary_ref) { } |
|
|
0 |
0 |
elsif ($hash_ref) { } |
|
1071
|
2 |
2 |
if (SvTRUE(POP)) { } |
|
1080
|
2 |
20 |
if (not SvTRUE(TOP)) { } |
|
1089
|
0 |
0 |
if (SvTRUE(TOP)) { } |
|
1098
|
0 |
0 |
if (not SvTRUE(TOP)) { } |
|
1106
|
0 |
1 |
if (SvTRUE(TOP)) { } |
|
1126
|
0 |
0 |
if ($type eq 'AV') { } |
|
|
0 |
0 |
elsif ($type eq 'HV') { } |
|
|
0 |
0 |
elsif ($type eq 'CV') { } |
|
1138
|
0 |
0 |
$defined ? : |
|
1143
|
2 |
0 |
if (GIMME_V == 3) |
|
1147
|
0 |
0 |
if (SvTRUE(GET_TARGET())) { } |
|
1156
|
2 |
0 |
if (GIMME_V == 3) |
|
1163
|
2 |
0 |
if (GIMME_V == 3) { } |
|
1170
|
0 |
2 |
if (_range_is_numeric($left, $right) and $i >= $max) |
|
1201
|
0 |
0 |
if (defined ${$sv;}) { } |
|
1216
|
0 |
0 |
SvNV($left) == SvNV($right) ? : |
|
1222
|
0 |
0 |
SvNV($left) != SvNV($right) ? : |
|
1228
|
0 |
0 |
SvNV($left) < SvNV($right) ? : |
|
1234
|
0 |
0 |
SvNV($left) <= SvNV($right) ? : |
|
1240
|
0 |
0 |
SvNV($left) > SvNV($right) ? : |
|
1246
|
0 |
0 |
SvNV($left) >= SvNV($right) ? : |
|
1259
|
0 |
0 |
SvPV($left) eq SvPV($right) ? : |
|
1265
|
0 |
0 |
SvPV($left) ne SvPV($right) ? : |
|
1271
|
0 |
0 |
SvPV($left) lt SvPV($right) ? : |
|
1277
|
0 |
0 |
SvPV($left) le SvPV($right) ? : |
|
1283
|
0 |
0 |
SvPV($left) gt SvPV($right) ? : |
|
1289
|
0 |
0 |
SvPV($left) ge SvPV($right) ? : |
|
1329
|
1 |
4 |
if ($Acme::Perl::VM::PP::PL_last_in_gv->class ne 'GV') |
|
1340
|
2 |
3 |
if ($gimme == 3) { } |
|
1354
|
0 |
6 |
$Acme::Perl::VM::PP::PL_op->flags & 64 ? : |
|
1359
|
6 |
0 |
$ret ? : |
|
1365
|
0 |
0 |
$Acme::Perl::VM::PP::PL_op->flags & 64 ? : |
|
1371
|
0 |
0 |
$ret ? : |
|
1377
|
0 |
0 |
if (MAXARG() == 1) { } |
|
1382
|
0 |
0 |
if ($sv->ROK) |
|
1386
|
0 |
0 |
if ($pkg eq '') |
|
1433
|
0 |
1 |
$Acme::Perl::VM::PP::PL_op->flags & 128 ? : |
|
1445
|
0 |
0 |
if ($elemsv->ROK) |
|
1470
|
0 |
12 |
if ($cxix < 0) { } |
|
1475
|
4 |
8 |
if ($gimme == 3) { } |
|
|
4 |
4 |
elsif ($gimme == 2) { } |
|
1489
|
6 |
0 |
unless ($Acme::Perl::VM::PP::PL_op->private) |
|
1502
|
0 |
0 |
!SvTRUE(TOP) ? : |