Branch Coverage

blib/lib/Code/Includable/Tree/NodeMethods.pm
Criterion Covered Total %
branch 55 80 68.7


line true false branch
25 320 0 if ($IGNORE_NO_CHILDREN_METHOD) { }
29 0 320 if $@
34 250 70 if (@children == 1)
35 36 214 unless defined $children[0]
36 204 10 if ref $children[0] eq "ARRAY"
98 4 16 if &$code($_)
106 4 8 unless $parent
108 8 0 if @siblings
114 4 8 unless $parent
116 8 0 if @siblings
122 4 8 unless $parent
130 0 12 unless $parent
132 12 0 if @siblings >= $n
138 0 12 unless $parent
140 12 0 if @siblings >= $n
146 0 20 unless $parent
149 20 0 if @siblings
155 0 40 unless $parent
158 40 0 if @siblings
164 0 8 unless $parent
173 0 16 unless $parent
176 16 0 if @siblings >= $n
182 0 16 unless $parent
185 16 0 if @children >= $n
190 0 12 unless my $parent = $self->$GET_PARENT_METHOD
194 8 32 if (&Scalar::Util::refaddr($siblings[$i]) == $refaddr)
203 0 8 unless my $parent = $self->$GET_PARENT_METHOD
207 4 20 if (&Scalar::Util::refaddr($siblings[$i]) == $refaddr)
216 0 12 unless my $parent = $self->$GET_PARENT_METHOD
220 8 24 if (&Scalar::Util::refaddr($siblings[$i]) == $refaddr)
229 0 8 unless my $parent = $self->$GET_PARENT_METHOD
233 4 24 if (&Scalar::Util::refaddr($siblings[$i]) == $refaddr)
243 2 2 $parent ? :
261 0 0 if @children >= $m
267 0 4 unless my $parent = $self->$GET_PARENT_METHOD
271 4 8 if (&Scalar::Util::refaddr($sibling) == $refaddr)
285 4 6 if ($opts->{'check_root'})
287 2 2 if defined $parent
295 4 8 unless (defined $childs_parent and &Scalar::Util::refaddr($childs_parent) == $refaddr)
302 0 8 if $opts->{'recurse'}