Branch Coverage

blib/lib/Game/DijkstraMap.pm
Criterion Covered Total %
branch 124 152 81.5


line true false branch
46 1 0 if exists $param->{'map'} and exists $param->{'str2map'}
48 0 11 if exists $param->{'map'}
50 5 6 if exists $param->{'str2map'}
58 6 4 if $x >= 0 and $x <= $maxcol
62 14 4 if $x >= 0 and $x <= $maxrow and $y >= 0 and $y <= $maxcol
75 26 24 if $r > 0 and $c > 0
76 25 25 if $r > 0 and $c < $maxcol
77 25 25 if $r < $maxrow and $c > 0
78 28 22 if $r < $maxrow and $c < $maxcol
85 196 74 if $c > 0
86 213 57 if $c < $maxcol
87 199 71 if $r > 0
88 210 60 if $r < $maxrow
96 1 0 if (defined $dimap)
112 1 1 unless defined $dimap
119 0 9 if ($value == $badcost)
126 1 16 if ($here[$h] == $badcost)
140 1 1 if not defined $fn or ref $fn ne 'CODE'
142 0 1 unless defined $dimap
155 0 7 if not defined $map or ref $map ne 'ARRAY' or not defined $map->[0] or ref $map->[0] ne 'ARRAY'
162 0 21 if @{$map->[$r]} != $cols
176 3 13 unless defined $dimap
179 0 13 if $r > $maxrow or $r < 0
180 0 13 if $c > $maxcol or $c < 0
183 1 12 if $value <= $self->min_cost
187 20 4 if $x >= 0 and $x <= $maxcol
191 56 4 if $x >= 0 and $x <= $maxrow and $y >= 0 and $y <= $maxcol
199 61 15 if $_->[1] < $value
217 1 6 unless defined $dimap
220 0 6 if $r > $maxrow or $r < 0
221 0 6 if $c > $maxcol or $c < 0
224 1 5 if $value <= $self->min_cost
226 5 0 if ($c > 0)
229 5 0 if ($c < $maxcol)
232 5 0 if ($r > 0)
235 5 0 if ($r < $maxrow)
240 14 6 if $_->[1] < $value
246 0 1 unless defined $dimap
251 0 1 if $curcost <= $self->min_cost
258 0 2 if $here[$h] == $badcost
264 0 1 unless @$coords
270 1 4 if $costs[$k][$p] == $badcost
274 1 1 if $newcost < $curcost
277 0 1 unless @ret
298 226 222 if $value == $badcost or $value == $mincost
300 40 182 if ($value < 0)
306 221 416 if $nv == $badcost
308 231 185 if $nv < $best
309 40 376 if $best == $mincost
311 52 170 if ($value >= $best + 2)
313 18 34 if $isneg
319 8 18 if $stable
347 9 47 if $value == $badcost or $value == $mincost
349 0 47 if ($value < 0)
358 4 182 if $nr->[0] == $badcost
360 84 98 if $nr->[0] < $best->[0]
361 26 156 if $best->[0] == $mincost
363 17 30 if ($value > $best->[0] + 1.4142135623730951)
365 0 17 if $isneg
371 2 3 if $stable
379 1 1 unless defined $dimap
398 1 2 unless defined $dimap
406 13 26 if $dimap->[$r][$c] != $mincost and $dimap->[$r][$c] != $badcost
418 0 6 unless defined $str
429 2 1 unless (defined $ref)
431 1 1 unless defined $ref
439 5 8 if $c == $cols - 1
449 1 2 unless defined $dimap
455 5 34 if $dimap->[$r][$c] == $maxcost
464 1 1 unless defined $dimap
469 0 1 if $r > $maxrow or $r < 0
470 0 1 if $c > $maxcol or $c < 0
471 0 1 unless &looks_like_number($ref->[2])
481 1 23 unless defined $dimap
487 0 29 if $r > $maxrow or $r < 0
488 0 29 if $c > $maxcol or $c < 0