Branch Coverage

blib/lib/Acme/Cow/Interpreter.pm
Criterion Covered Total %
branch 56 126 44.4


line true false branch
107 0 1 if $protoref
141 0 5 unless $selfref
147 0 5 if @_ > 0
174 0 1 unless $selfref
180 0 1 if @_ > 0
185 2 3 if ($ref eq 'ARRAY') { }
214 0 2 unless $selfref
219 0 2 if @_ < 1
220 0 2 if @_ > 1
225 0 2 unless defined $string
259 0 1 unless $selfref
264 0 1 if @_ < 1
265 0 1 if @_ > 1
275 0 1 unless open FILE, $file
286 0 1 unless close FILE
307 0 1 unless $selfref
313 0 1 if @_ > 0
326 1 2 if ($i == $mem_pos)
335 0 1 defined $reg ? :
357 0 1 unless $selfref
363 0 1 if @_ > 0
389 0 1 defined $reg ? :
411 0 3 unless $selfref
417 0 3 if @_ > 0
430 0 3 unless @$prog
457 0 656 if ($code == 0) { }
1 655 elsif ($code == 1) { }
2 653 elsif ($code == 2) { }
0 653 elsif ($code == 3) { }
28 625 elsif ($code == 4) { }
52 573 elsif ($code == 5) { }
563 10 elsif ($code == 6) { }
0 10 elsif ($code == 7) { }
6 4 elsif ($code == 8) { }
4 0 elsif ($code == 9) { }
0 0 elsif ($code == 10) { }
0 0 elsif ($code == 11) { }
470 0 0 if ($$prog_pos == 0)
479 0 0 if ($$prog[$$prog_pos] == 0) { }
0 0 elsif ($$prog[$$prog_pos] == 7) { }
502 0 1 if ($$mem_pos == 0)
508 1 0 if $$prog_pos == $#$prog
519 2 0 if ($$mem_pos > $#$mem)
523 0 2 if $$prog_pos == $#$prog
533 0 0 if ($$mem[$$mem_pos] == 3)
550 0 28 if ($$mem[$$mem_pos] == 0) { }
558 2 26 if $$prog_pos == $#$prog
570 0 52 if $$prog_pos == $#$prog
582 0 563 if $$prog_pos == $#$prog
592 0 0 if ($$mem[$$mem_pos] == 0) { }
607 0 0 if ($$prog_pos == $#$prog)
615 0 0 if ($$prog[$$prog_pos] == 7) { }
0 0 elsif ($$prog[$$prog_pos] == 0) { }
619 0 0 if ($prev_code == 7)
633 0 0 if $$prog_pos == $#$prog
639 0 0 if $$prog_pos == $#$prog
653 0 6 if $$prog_pos == $#$prog
663 2 2 if (defined $$reg) { }
670 0 4 if $$prog_pos == $#$prog
682 0 0 if $$prog_pos == $#$prog
693 0 0 unless defined $input
697 0 0 unless $input =~ /^[+-]?\d+/
702 0 0 if $$prog_pos == $#$prog