Branch Coverage

blib/lib/Graph/AdjacencyMap.pm
Criterion Covered Total %
branch 175 192 91.1


line true false branch
49 2292 2288 $need_s ? :
548 4032 $need_p ? :
73 3 12 $arity == 0 && !($f & 4) ? :
9 15 $arity == 1 ? :
77 10 14 if ($arity == 2) { }
83 61 32 defined(my $id = $m->has_path([$p, $_])) ? :
84 3 58 $multi ? :
32 61 !$text ? :
86 4 89 defined $attrs ? :
91 4 29 $multi ? :
93 26 7 !defined($attrs) ? :
106 8 30 unless $_[0]
112 27 31 if defined $got and not ref $got
116 31 0 if $dumper->can("Sortkeys")
128 99 63 $m->[1] & 2 ? :
154 185 200 if $a == 1 and $f & 8 and ref $k
155 385 285 $a == 1 ? :
30 670 $a == 0 && !($f & 4) ? :
156 228 472 if (exists $pi->{$l})
157 173 55 unless $inc_if_exists and $f & &_COUNTMULTI()
159 21 34 unless $is_multi
161 17 17 if ($id eq &_GEN_ID())
169 63 122 $id eq &_GEN_ID() ? :
185 287 if $is_multi
170 185 62 $is_multi ? :
247 225 if $f & &_COUNTMULTI()
171 174 298 if $map_s
179 55 119 unless $map_p
189 2 61 if (@new)
191 0 2 if $map_p
195 34 27 unless keys %{$$map_s{$p};}
196 32 29 unless $map_p
198 19 10 unless keys %{$$map_p{$s};}
204 15695 16 unless $unord or $hyper
205 5 37063 if $unord and $hyper and not @$seq
207 37063 16 if ($unord) { }
215 306 73602 $allow_self ? :
221 23 397 unless my($i) = &__has_path
225 293 36 $f & 2 ? :
68 329 $f & 1 ? :
233 95 454 unless my($i) = &__has_path
238 1 208 unless my($i, $l) = &__has_path
239 12 196 if &_is_COUNT and --$_[0][8][$i] > 0
245 0 22 unless my($i, $l) = &__has_path
247 9 13 if keys %$attrs
253 2 309 unless +(my $m = $_[0])->[1] & 2 and my($i) = &__has_path
259 0 32 if $m->[2] != 1
260 0 32 unless my($i, $l) = $m->__has_path($from)
262 4 28 if ref $to and $m->[1] & 8
268 0 38 unless my($i) = &__has_path
270 11 27 if $m->[1] & 2
277 891 699 if $a == 1 and $f & 8 and ref $k
278 1590 1267 $a == 1 ? :
66 2857 $a == 0 && !($f & 4) ? :
280 2541 382 defined $id ? :
284 9 555 unless my($i) = &__has_path
286 391 164 $m->[1] & 2 ? :
290 20 62 unless &{$_[0]->can("_get_path_attrs");}
56 6 keys %{return undef unless &{$_[0]->can('_get_path_attrs');};} ? :
302 18 60 unless &{$_[0]->can("_get_path_attrs");}
306 4 22 unless &{$_[0]->can("_get_path_attrs");}
310 4 36 unless my $attrs = &{$_[0]->can("_get_path_attrs");}
311 0 36 unless exists $$attrs{my $attr = $_[-1]}
313 21 15 if keys %$attrs
324 26 183 if $map_s
330 302 17569 $deep ? :
334 0 4893 unless $_[0][3]
338 0 302 unless $_[0][4]
346 174 1007 if $a and not $is_ref and $deep < 2
347 8 215 $a != 1 ? :
44 139 $deep ? :
348 33 11 $is_multi ? :
13 44 !$ensure ? :
166 57 if (defined $id) { }
352 37 133 $deep ? :
356 116 1050 $deep ? :
357 12 1265 $deep > 1 ? :
358 1067 210 if $a == 1 and $is_ref and ref $k
359 1277 6 $a == 1 ? :
7 1283 $a == 0 && !$is_unord ? :
361 0 188 $is_multi ? :
161 188 !$ensure ? :
941 349 if (defined $id) { }
365 12 1104 $deep > 1 ? :
367 111 894 $deep ? :
374 0 44 if grep((!defined($_)), @v)
376 11 39 unless $map_x->{$_}
384 0 234 if grep((!defined($_)), @v)
386 61 179 unless $map_x->{$_}
393 0 72 if grep((!defined($_)), $u, $v)
394 18 54 unless $map_s->{$u}
399 0 2151 unless ref $k and $f & 8
400 4 2147 if $f & 64
407 0 3623 if $a > 1 and @$k != $a
417 0 4 unless defined(my $k = $i2p->[$i])
418 4 0 if $is_ref and ref $k