Branch Coverage

blib/lib/Data/Layout/BuddySystem.pm
Criterion Covered Total %
branch 58 84 69.0


line true false branch
36 0 18 unless $name
38 0 18 unless $name =~ /\A\w+\Z/
40 0 18 if defined $buddySystem->nameAlloc->{$name}
50 0 1117 unless $size >= 0
51 0 1117 unless $size == int $size
54 76 1041 if ($buddySystem->size == 0)
62 1885 47 if (my $f = $buddySystem->freeChains->[$F])
63 949 936 if (keys %$f)
75 45 47 if ($size < $s - 1) { }
102 0 9 unless defined $alloc
114 0 9 unless defined $address
128 0 965 unless defined $s
140 886 954 $u ? :
141 875 965 if (delete $buddySystem->freeChains->[$c]{$b}) { }
919 46 elsif ($c < $S) { }
142 19 856 $u ? :
153 0 306 if $a->[$i]
154 270 36 if $i < @$a
178 2194 30218 unless $f
187 80 2291 unless $n
195 0 1015 unless $t > 0
206 0 1084 unless $u + $f == $t
215 0 1084 unless $u == $n
233 223 320 if (my $F = $buddySystem->freeChains->[$B])
239 0 131634 if (defined $t[$o]) { }
244 82 0 if (my $U = $buddySystem->usedSize)
251 0 18847 if (defined $t[$o]) { }
255 0 82 if ($e or $x != $buddySystem->totalSpace)
268 223 320 if (my $F = $buddySystem->freeChains->[$B])
272 82 0 if (my $U = $buddySystem->usedSize)
279 2 80 if $title
288 2 0 if (my $u = $buddySystem->usedSize)
290 51 20 $order ? :
291 57 14 unless $c == 0
298 9 17 if (my $name = $buddySystem->allocName->{$a}) { }
304 0 26 if $copy
305 0 26 if (my $f = $buddySystem->cameFrom->{$a})
306 0 0 if ($f != $A)
343 0 9 unless $offset == int $offset
350 0 1 if $@
355 0 1 if $@
360 0 1 unless eval join('', readline DATA)