Branch Coverage

blib/lib/Paranoid/Data/AVLTree.pm
Criterion Covered Total %
branch 113 194 58.2


line true false branch
105 1 0 if ($enable)
127 1 0 if (defined $self->[3]) { }
154 7 2 defined $self->[0] ? :
165 10 3 defined $self->[0] ? :
182 0 0 if $i
183 0 0 defined $side ? :
188 0 0 if defined $node->left
189 0 0 if defined $node->right
204 0 0 if defined $self->[0]
221 9 14 if defined $node->left
222 10 13 if defined $node->right
237 4 2 if defined $self->[0]
263 143 4 if (defined $root)
266 123 266 if ($node->key eq $key) { }
273 167 99 $key gt $node->key ? :
299 11 0 if (defined $key)
322 12 0 if (defined $key)
325 12 0 if defined $node
351 25 0 if (defined $nn) { }
352 20 5 if (defined $root) { }
353 0 20 if ($self->_findNode($key, \$node, \@path)) { }
360 30 18 if ($key gt $_->key) { }
366 16 4 if ($key gt $path[-1]->key) { }
372 4 16 if $self->[2]
380 1 4 if $self->[2]
407 10 9 if (defined $root) { }
410 6 4 if (defined $root->left and $root->left == $oref) { }
4 0 elsif (defined $root->right and $root->right == $oref) { }
446 6 0 if $rv = defined $x and defined $z
449 6 0 if ($rv)
456 2 4 if (defined $root) { }
461 1 5 if $self->[2]
484 8 0 if $rv = defined $x and defined $z
487 8 0 if ($rv)
494 4 4 if (defined $root) { }
499 0 8 if $self->[2]
523 0 0 if ($rv) { }
525 0 0 if ($z == $y) { }
556 0 0 if ($rv) { }
558 0 0 if ($z == $y) { }
588 8 6 if ($x->balance > 1) { }
6 0 elsif ($x->balance < -1) { }
591 0 8 if ($x->right->balance < 0) { }
605 0 6 if ($x->left->balance > 0) { }
636 30 0 if ($self->_findNode($key, \$node, \@path))
644 1 29 if $self->[2] and $n
652 14 6 if (abs $node->balance > 1) { }
689 25 0 if ($rv)
717 1 0 if (defined $ln and defined $rn) { }
720 0 1 if ($ln->height < $rn->height) { }
736 0 0 if ($_->rHeight < $height)
765 2 0 if ($_->lHeight < $height)
803 5 0 if ($self->_findNode($key, \$node, \@path))
807 4 1 if (scalar $node->children <= 1) { }
810 0 4 defined $node->right ? :
0 4 defined $node->left ? :
819 2 9 if ($key lt $_->key) { }
820 0 2 if defined $_->left and $_->left->height < $_->lHeight
824 2 7 if defined $_->right and $_->right->height < $_->rHeight
835 1 0 if ($self->_findNode($key, \$node, \@path)) { }
844 0 5 if $self->[3] and $rv
847 0 5 unless defined $root
848 5 0 if defined $root and $rv
889 5 0 length $k ? :
0 5 !defined($k) ? :
893 5 0 length $v ? :
0 5 !defined($v) ? :
900 0 5 $kf ? :
0 5 $vf ? :
903 5 0 unless $kf
904 5 0 unless $vf
906 5 0 pwrite($file, $rec) == length $rec ? :
909 0 5 unless $rv
927 1 0 if (defined $file and length $file)
928 1 0 if (popen($file, 66))
933 1 0 if (defined $self->[0]) { }
956 2 0 if defined $node
960 1 1 if $rv and defined $node
965 1 1 if $rv and defined $node
970 0 2 if $rv and defined $node
1007 5 0 if (&pread($file, \$sig, 28) == 28) { }
1009 5 0 if ($stype eq 'PDAVL') { }
1014 0 5 unless (defined $kl and defined $vl)
1028 5 0 if ($rv)
1029 0 5 if ($kf)
1030 0 0 if $kf == 1
1032 0 5 if ($vf)
1033 0 0 if $vf == 1
1038 5 0 if ($rv and $kl)
1039 5 0 if (&pread($file, \$content, $kl) == $kl) { }
1048 5 0 if ($rv and $vl)
1049 5 0 if (&pread($file, \$content, $vl) == $vl) { }
1058 5 0 if $rv
1060 0 5 unless $rv
1081 1 0 if (defined popen($file, 2))
1143 3 2 if (@k)
1157 15 3 if (defined $self->[1] and scalar @{$self->[1];})