Branch Coverage

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


line true false branch
49 901 897 $need_s ? :
471 1327 $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 62 63 $m->[1] & 2 ? :
154 185 141 if $a == 1 and $f & 8 and ref $k
155 326 200 $a == 1 ? :
30 526 $a == 0 && !($f & 4) ? :
156 189 367 if (exists $pi->{$l})
157 136 53 unless $inc_if_exists and $f & &_COUNTMULTI()
159 21 32 unless $is_multi
161 17 15 if ($id eq &_GEN_ID())
169 39 41 $id eq &_GEN_ID() ? :
80 287 if $is_multi
170 80 62 $is_multi ? :
142 225 if $f & &_COUNTMULTI()
171 117 250 if $map_s
179 39 78 unless $map_p
189 2 59 if (@new)
191 0 2 if $map_p
195 33 26 unless keys %{$$map_s{$p};}
196 32 27 unless $map_p
198 17 10 unless keys %{$$map_p{$s};}
204 15135 16 unless $unord or $hyper
205 5 11884 if $unord and $hyper and not @$seq
207 11884 16 if ($unord) { }
215 309 23238 $allow_self ? :
221 23 194 unless my($i) = &__has_path
225 90 36 $f & 2 ? :
68 126 $f & 1 ? :
233 33 235 unless my($i) = &__has_path
238 1 207 unless my($i, $l) = &__has_path
239 12 195 if &_is_COUNT and --$_[0][8][$i] > 0
245 0 17 unless my($i, $l) = &__has_path
247 8 9 if keys %$attrs
253 2 49 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 430 if $a == 1 and $f & 8 and ref $k
278 1321 577 $a == 1 ? :
66 1898 $a == 0 && !($f & 4) ? :
280 1644 320 defined $id ? :
284 9 346 unless my($i) = &__has_path
286 182 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 24 180 if $map_s
330 301 5878 $deep ? :
334 0 3526 unless $_[0][3]
338 0 302 unless $_[0][4]
346 124 1093 if $a and not $is_ref and $deep < 2
347 8 146 $a != 1 ? :
37 84 $deep ? :
348 15 11 $is_multi ? :
13 26 !$ensure ? :
115 39 defined $id ? :
352 30 78 $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 defined $id ? :
365 12 1104 $deep > 1 ? :
367 111 894 $deep ? :
374 0 46 if grep((!defined($_)), @v)
376 10 42 unless $map_x->{$_}
384 0 181 if grep((!defined($_)), @v)
386 54 133 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 2520 if $a > 1 and @$k != $a
417 0 4 unless defined(my $k = $i2p->[$i])
418 4 0 if $is_ref and ref $k