Branch Coverage

blib/lib/Geo/SpaceManager.pm
Criterion Covered Total %
branch 81 136 59.5


line true false branch
80 0 7 unless $top
81 1 6 if defined $dbg
89 1 6 if $DEBUG
119 0 1 unless (defined $rec)
145 0 309 unless ($rec and @$rec == 4)
150 0 309 if $DEBUG
158 0 618 if ($$rec[$i] > $$self{'top'}[$opposite[$i]] or $$rec[$i + 2] < $$self{'top'}[$opposite[$i + 2]])
169 0 2961 if $DEBUG
172 0 2961 if $left >= $$r[2]
173 1147 1814 if $right <= $$r[0]
174 606 1208 if $bottom >= $$r[3]
175 816 392 if $top <= $$r[1]
183 4 388 if ($left <= $$r[0] and $bottom <= $$r[1] and $right >= $$r[2] and $top >= $$r[3]) { }
190 0 4 if $DEBUG
195 0 388 if $DEBUG
196 354 34 if ($right < $$r[2])
198 0 354 if $DEBUG
204 0 388 if $DEBUG
205 22 366 if ($bottom > $$r[1])
207 0 22 if $DEBUG
213 0 388 if $DEBUG
214 13 375 if ($left > $$r[0])
216 0 13 if $DEBUG
222 0 388 if $DEBUG
223 352 36 if ($top < $$r[3])
225 0 352 if $DEBUG
233 392 0 if ($reduce)
238 0 309 if ($DEBUG)
252 0 309 if $DEBUG
255 0 741 if $DEBUG
260 36 705 if $$r1[2] - $$r1[0] < ${$$self{'minimum'};}[0] or $$r1[3] - $$r1[1] < ${$$self{'minimum'};}[1]
267 697 1744 if $i1 eq $i2
269 0 1744 if $DEBUG
272 584 1160 if ($$r1[0] == $$r2[0] and $$r1[1] == $$r2[1] and $$r1[2] == $$r2[2] and $$r1[3] == $$r2[3]) { }
279 292 292 if $i1 < $i2
284 15 61 if $$r1[0] >= $$r2[0] and $$r1[1] >= $$r2[1] and $$r1[2] <= $$r2[2] and $$r1[3] <= $$r2[3]
291 0 398 if $DEBUG
294 0 309 if ($DEBUG)
313 392 3251 if $r eq $s
316 0 2569 if $DEBUG
326 0 309 if ($DEBUG)
354 0 510 if $DEBUG
359 0 510 if $DEBUG
363 0 737 if $DEBUG
364 509 0 if $$rec[0] >= $$r[0] and $$rec[1] >= $$r[1] and $$rec[2] <= $$r[2] and $$rec[3] <= $$r[3]
371 0 228 if $DEBUG
373 0 228 if $w > $$r[2] - $$r[0]
374 0 228 if $h > $$r[3] - $$r[1]
381 0 228 if ($dif[1] * $dif[3] > 0)
382 0 0 $absdif[1] > $absdif[3] ? :
385 228 0 if ($dif[0] * $dif[2] > 0)
386 0 228 $absdif[0] > $absdif[2] ? :
389 0 228 if $DEBUG
390 47 181 if (not $best or $dist < $best_dist)
393 0 47 if $DEBUG
398 1 0 unless $best
400 0 0 if $DEBUG
404 0 0 if ($$r[0] < $$best[0]) { }
0 0 elsif ($$r[2] > $$best[2]) { }
411 0 0 if ($$r[1] < $$best[1]) { }
0 0 elsif ($$r[3] > $$best[3]) { }
445 0 2049 unless ($r2)
469 0 0 if (${$a;}[0] == ${$b;}[0]) { }
493 0 517 unless $rec
495 400 634 if ($$rec[$i] > $$rec[$opposite[$i]])
509 0 309 unless $rec
511 45 264 if ($left > $right)
514 45 264 if ($bottom > $top)