Branch Coverage

blib/lib/Lazy/Util.pm
Criterion Covered Total %
branch 31 32 96.8


line true false branch
23 4 82 if defined &blessed($_[0])
29 8 20 if @vals == 0
31 0 20 if @vals == 1 and _isa($vals[0], 'Lazy::Util::OO')
39 1 83 if &SCALAR_DEFER() and _isa($vals[0], 0) or ref $vals[0] eq 'CODE'
45 80 4 unless _isa($vals[0], 'Lazy::Util::OO')
49 3 1 if (defined(my $get = $vals[0]->get)) { }
65 3 1 if $n-- > 0
81 2 3 if (&$grep($get))
99 1 7 if @subvals
103 2 8 unless defined $get
124 4 5 unless $uniq{$key}++
141 4 5 unless $uniq{$get}++
157 2 7 if $found
219 3 3 if $get > $ret
231 1 6 if $get < $ret
245 1 6 if $ret == 0