Branch Coverage

blib/lib/Game/PlatformsOfPeril.pm
Criterion Covered Total %
branch 0 134 0.0


line true false branch
352 0 0 if $ent->[6]
355 0 0 if $here->[1] == 22 or $ent->[2] == 3 and $$LMap[$here->[1]][$here->[0]][1][0] == 6 or $$LMap[$here->[1] + 1][$here->[0]][1][0] == 5
360 0 0 unless interact($ent, $dest)
361 0 0 if ($ent->[0] == 0)
362 0 0 if ($ent->[5][1][0] == 6) { }
378 0 0 if @_
384 0 0 if ($value < $min) { }
0 0 elsif ($value > $max) { }
397 0 0 if (defined $lmc->[3]) { }
0 0 elsif (defined $lmc->[2]) { }
422 0 0 if $lmc->[1][2] == 8
436 0 0 if $start eq $end
445 0 0 if ($node eq $end)
452 0 0 if (not exists $seen{$new} or $cost < $costs{$new})
464 0 0 unless $linked
476 0 0 if bad_terminal()
494 0 0 if bad_terminal()
501 0 0 if @RedrawA
502 0 0 if $Animates[0][4]->() == 2
505 0 0 if not $ent->[6] and defined $ent->[4]
531 0 0 if ($ent->[0] == 1) { }
550 0 0 if $Game::PlatformsOfPeril::LMap->[$r][$c][1][0] == 5
552 0 0 if ($c != 22 and $Game::PlatformsOfPeril::LMap->[$r][$c][1][0] == 6 || $$LMap[$r + 1][$c][1][0] == 5 and $Game::PlatformsOfPeril::LMap->[$r][$c + 1][1][0] == 6 || $Game::PlatformsOfPeril::LMap->[$r][$c + 1][1][0] != 5 && $$LMap[$r + 1][$c + 1][1][0] == 5)
563 0 0 if ($r > 0)
565 0 0 if ($Game::PlatformsOfPeril::LMap->[$r][$c][1][0] == 6 and $$LMap[$r - 1][$c][1][0] == 6) { }
0 0 elsif ($Game::PlatformsOfPeril::LMap->[$r][$c][1][0] == 6 or $Game::PlatformsOfPeril::LMap->[$r][$c][1][0] == 4 and $$LMap[$r + 1][$c][1][0] == 5) { }
580 0 0 if $Game::PlatformsOfPeril::LMap->[22][$c][1][0] == 5
581 0 0 if ($Game::PlatformsOfPeril::LMap->[22][$c][1][0] == 6 and $Game::PlatformsOfPeril::LMap->[21][$c][1][0] == 6) { }
587 0 0 if ($c != 22)
597 0 0 if $Game::PlatformsOfPeril::LMap->[$x][$c][1][0] == 5
599 0 0 if ($Game::PlatformsOfPeril::LMap->[$x][$c][1][0] == 6)
600 0 0 if ($weight == 1) { }
609 0 0 if ($c != 0 and $Game::PlatformsOfPeril::LMap->[$x][$c - 1][1][0] == 6 || $Game::PlatformsOfPeril::LMap->[$x][$c - 1][1][0] == 4 && $$LMap[$x + 1][$c - 1][1][0] == 5)
619 0 0 if ($c != 22 and $Game::PlatformsOfPeril::LMap->[$x][$c + 1][1][0] == 6 || $Game::PlatformsOfPeril::LMap->[$x][$c + 1][1][0] == 4 && $$LMap[$x + 1][$c + 1][1][0] == 5)
643 0 0 if (defined $target)
655 0 0 unless defined $no_draw
665 0 0 unless -e $file
667 0 0 unless open my $fh, '<', $file
676 0 0 if length $line != 23
681 0 0 if (exists $Things{$c}) { }
682 0 0 if ($c eq 2) { }
0 0 elsif ($c eq 3) { }
692 0 0 if ($c eq 0) { }
0 0 elsif ($c eq 1) { }
693 0 0 if defined $Animates[0][5]
708 0 0 if ++$rownum == 23
710 0 0 if $rownum < 23
711 0 0 unless defined $Animates[0][5]
756 0 0 unless &first(sub { $_->[0] eq $to; } , @{$Graphs[$Rotation]{$from}})
760 0 0 unless interact($ent, $dest)
778 0 0 if (defined $x)
788 0 0 if $key eq "\e"
790 0 0 if (ord $key < 97)
809 0 0 if $msg
868 0 0 $name =~ s/oo/ee/u ? :
885 0 0 if (defined $ent and not $ent->[6])
945 0 0 if $row == 22 or $Game::PlatformsOfPeril::LMap->[$row][$col][1][0] == 6
949 0 0 if $Game::PlatformsOfPeril::LMap->[$r][$col][1][0] == 5
950 0 0 if ($Game::PlatformsOfPeril::LMap->[$r][$col][1][0] == 6 or $r < 21 and $Game::PlatformsOfPeril::LMap->[$r][$col][1][0] == 4 and $$LMap[$r + 1][$col][1][0] == 5 or $r == 22 and $Game::PlatformsOfPeril::LMap->[$r][$col][1][0] == 4)
970 0 0 if exists $Key_Commands{$key}
974 0 0 if defined $msg
975 0 0 if $ret == 1 or $ret == 2
992 0 0 if ($mrow != 22 and $ent->[5][1][0] == 4 and $$LMap[$mrow + 1][$mcol][1][0] != 5)
999 0 0 unless defined $dest
1001 0 0 unless interact($ent, $dest)
1003 0 0 if ($ent->[3][0] > 0 and not defined $ent->[5][2])
1005 0 0 if (rand() < $ent->[3][1])