Branch Coverage

blib/lib/Games/Rezrov/ZInterpreter.pm
Criterion Covered Total %
branch 48 76 63.1


line true false branch
34 0 1 if (my $where = Games::Rezrov::ZOptions::WRITE_OPCODES())
35 0 0 if ($where eq 'STDERR') { }
38 0 0 unless open LOG, ">$where"
53 1 0 unless ($INTERPRETER_GENERATED)
64 0 1 if (Games::Rezrov::ZOptions::WRITE_OPCODES())
79 0 0 unless $inline_code =~ s/#WRITE_OPCODES_STUB/$CODE/
82 0 1 if (Games::Rezrov::ZOptions::COUNT_OPCODES())
86 0 0 unless $inline_code =~ s/#COUNT_OPCODES_STUB/$CODE/
93 781 1782 ($opcode & 64) == 0 ? :
1480 1083 ($opcode & 32) == 0 ? :
86 924 ($opcode & 32) == 0 ? :
14 486 $optype == 1 ? :
500 119 if ($optype > 0) { }
0 695 if ($opcode == 190 and $z_version >= 5) { }
76 619 elsif (($opcode & 48) == 48) { }
2563 1705 if (($opcode & 128) == 0) { }
1010 695 elsif ($opcode & 64) { }
0 1010 if ($op_style == 3 and $opcode == 12 || $opcode == 26) { }
952 2910 if $optype == 3
227 2446 $optype == 1 ? :
2673 237 if ($optype > 0) { }
1010 3258 if ($var_ops)
29 0 if ($opcode == 11) { }
0 0 Games::Rezrov::ZOptions::GUESS_TITLE() ? :
0 4 if ($count_opcodes and ++$input_counts > (Games::Rezrov::ZOptions::GUESS_TITLE() ? 1 : 0))
4 0 if ($opcode == 4) { }
0 0 elsif ($opcode == 22) { }
0 1 if ($opcode == 7) { }
1 0 elsif ($opcode == 10) { }
4234 34 if ($oc = $generic_opcodes[$op_style][$opcode]) { }
29 5 elsif ($op_style == 1) { }
4 1 elsif ($op_style == 3) { }
1 0 elsif ($op_style == 0) { }
0 1 if (Games::Rezrov::ZOptions::END_OF_SESSION_MESSAGE())
0 1 if Games::Rezrov::StoryFile::game_title()
0 1 if $count_opcodes
100 1 1 defined $_[1] ? :
105 0 1 unless $first_time