Branch Coverage

blib/lib/Tree/AVL.pm
Criterion Covered Total %
branch 127 290 43.7


line true false branch
80 1 0 unless ($$self{'fcompare'})
83 1 0 unless ($$self{'fget_key'})
86 1 0 unless ($$self{'fget_data'})
102 0 7 unless (defined $object)
119 7 5 unless ($depth)
122 7 5 unless ($node)
135 2 10 if (not defined $$self{'_node'}{'_obj'}) { }
144 0 10 unless (defined $own_key)
151 0 10 if ($result == 0) { }
7 3 elsif ($result < 0) { }
155 3 4 if (not defined $$$node{'_right_node'}) { }
174 2 1 if (not defined $$$node{'_left_node'}) { }
195 8 2 if ($increase and $$$node{'_balance'}) { }
203 5 5 if ($depth == 0)
238 3 2 unless ($node)
241 3 2 unless ($depth)
249 0 5 if (not defined $$$node{'_obj'}) { }
259 1 4 if ($result > 0) { }
2 2 elsif ($result < 0) { }
2 0 elsif ($result == 0) { }
260 0 1 if (not defined $$$node{'_left_node'}) { }
265 0 1 if ($deleted_node) { }
275 1 1 if (not defined $$$node{'_right_node'}) { }
280 0 1 if ($deleted_node) { }
292 1 1 if (not $$$node{'_left_node'} || $$$node{'_right_node'}) { }
0 1 elsif (not $$$node{'_left_node'}) { }
0 1 elsif (not $$$node{'_right_node'}) { }
1 0 elsif ($$$node{'_right_node'} and $$$node{'_left_node'}) { }
294 1 0 if ($depth == 0) { }
326 0 1 if ($self->is_empty($$$node{'_right_node'}))
338 1 1 if ($decrease) { }
339 1 0 if ($$$node{'_balance'}) { }
365 1 3 unless ($node)
375 2 2 if (not $$$node{'_left_node'}) { }
377 0 2 if (not $$$node{'_right_node'} || $depth) { }
387 1 1 if ($$$node{'_right_node'}) { }
393 1 1 if ($$node)
405 1 1 if ($decrease)
406 1 0 if ($$$node{'_balance'}) { }
429 1 1 unless ($node)
439 1 1 if (not $$$node{'_right_node'}) { }
441 0 1 if (not $$$node{'_left_node'} || $depth) { }
451 0 1 if ($$$node{'_left_node'}) { }
457 0 1 if ($$node)
469 1 0 if ($decrease)
470 1 0 if ($$$node{'_balance'}) { }
495 1 10 if ($$$node{'_balance'} < -1) { }
2 8 elsif ($$$node{'_balance'} > 1) { }
496 1 0 if ($$$node{'_left_node'})
497 1 0 if ($$$node{'_left_node'}{'_balance'} == 1) { }
506 2 0 if ($$$node{'_right_node'})
507 1 1 if ($$$node{'_right_node'}{'_balance'} == -1) { }
535 2 0 if ($$$node{'_left_node'})
540 1 1 if ($$$node{'_right_node'} and $$$node{'_left_node'}) { }
541 0 1 $$$node{'_left_node'}{'_balance'} == 0 ? :
548 2 0 if (defined $$$node{'_left_node'})
549 0 2 if ($$$node{'_left_node'}{'_right_node'})
554 2 0 if ($lnode)
560 2 0 if ($$$node{'_right_node'})
583 3 0 if ($$$node{'_right_node'})
588 1 2 if ($$$node{'_left_node'} and $$$node{'_right_node'}) { }
589 0 1 $$$node{'_right_node'}{'_balance'} == 0 ? :
595 3 0 if (defined $$$node{'_right_node'})
596 1 2 if ($$$node{'_right_node'}{'_left_node'})
602 3 0 if ($rnode)
608 3 0 if ($$$node{'_left_node'})
633 1 0 if ($$$node{'_left_node'})
636 0 1 if ($$$node{'_right_node'})
640 1 0 if ($$$node{'_left_node'})
646 1 0 if ($$$node{'_left_node'})
649 1 0 if ($$$node{'_right_node'})
674 1 0 if ($$$node{'_left_node'})
677 1 0 if ($$$node{'_right_node'})
681 1 0 if ($$$node{'_right_node'})
686 1 0 if ($$$node{'_left_node'})
689 1 0 if ($$$node{'_right_node'})
701 0 1 unless ($node)
705 0 1 unless (defined $$node{'_obj'})
755 0 0 if ($which_extreme eq 0) { }
0 0 elsif ($which_extreme == 1) { }
765 0 0 unless ($node)
770 0 0 if (not $next_node) { }
840 2 5 unless ($node)
844 4 3 if (not $$node{'_left_node'} || $$node{'_right_node'}) { }
849 2 1 if ($$node{'_left_node'})
852 3 0 if ($$node{'_right_node'})
856 1 2 $depth_left < $depth_right ? :
874 0 0 if (not defined $$node{'_obj'}) { }
884 0 0 unless ($cmpfunc)
888 0 0 if ($result == 0) { }
0 0 elsif ($result < 0) { }
916 0 0 if (not defined $$node{'_obj'}) { }
925 0 0 unless ($cmpfunc)
929 0 0 if ($result == 0) { }
0 0 elsif ($result < 0) { }
957 0 0 if (not defined $$node{'_obj'}) { }
966 0 0 unless ($cmpfunc)
970 0 0 if ($result == 0) { }
0 0 elsif ($result < 0) { }
1012 0 0 unless ($node)
1017 0 0 unless ($acc_results)
1021 0 0 unless ($partial_cmpfunc and $exact_cmpfunc)
1025 0 0 if (not defined $$node{'_obj'}) { }
1037 0 0 if ($partial_cmp == 0) { }
0 0 elsif ($partial_cmp < 0) { }
1039 0 0 unless ($acc_results)
1044 0 0 if ($exact_cmp == 0) { }
1049 0 0 if ($$node{'_right_node'} and $$node{'_left_node'}) { }
0 0 elsif ($$node{'_right_node'}) { }
0 0 elsif ($$node{'_left_node'}) { }
1079 0 0 if (scalar @{$acc_results;} > 0)
1106 0 0 if ($$self{'acc_lookup_hash'}{$acc_lookup_hash_key}) { }
1129 0 0 unless ($node)
1132 0 0 unless ($lst)
1135 0 0 if ($$node{'_left_node'})
1139 0 0 if ($obj)
1142 0 0 if ($$node{'_right_node'})
1173 0 0 if ($i == 0)
1177 0 0 if (defined $stack[$i]{'_obj'})
1230 1 1 unless ($order)
1232 1 1 if ($order eq '>') { }
1252 0 2 if ($i == 0)
1271 0 0 unless ($node)
1275 0 0 if ($$node{'_left_node'})
1281 0 0 if ($$node{'_right_node'})
1303 0 0 if ($i == 0)
1331 0 0 if ($i == 0)
1356 0 0 unless ($node or defined $depth)
1359 0 0 unless ($depth)
1360 0 0 unless ($o_char)
1367 0 0 unless (defined $$self{'_node'}{'_obj'})
1372 0 0 unless (defined $key)
1375 0 0 unless (defined $data)
1382 0 0 if ($$node{'_left_node'})
1386 0 0 if ($$node{'_right_node'})
1397 0 0 unless ($o_char)
1404 0 0 unless (defined $key)
1407 0 0 unless (defined $data)
1413 0 0 if ($$node{'_left_node'})
1417 0 0 if ($$node{'_right_node'})
1439 0 0 if ($i == 0)
1460 9 6 if ($obj1 lt $obj2) { }
4 2 elsif ($obj1 gt $obj2) { }
1472 2 5 $a < $b ? :
1479 0 7 $a < $b ? :