Branch Coverage

blib/lib/VCS/Lite.pm
Criterion Covered Total %
branch 69 96 71.8


line true false branch
70 10 27 if (ref $sep eq 'HASH')
79 20 17 unless $src
83 37 0 if $sep
89 0 37 if (not $atyp) { }
17 20 elsif ($atyp eq 'ARRAY') { }
20 0 elsif ($atyp eq 'GLOB') { }
0 0 elsif ($atyp eq 'CODE') { }
111 8 29 if @contents and not $contents[-1] =~ /$sep$/
114 6 31 if ($proto{'chomp'})
130 2 0 exists $$self{'original'} ? :
146 3 0 unless ref $base
150 1 2 exists $$other{'original'} ? :
162 27 13 wantarray ? :
168 0 26 @_ ? :
178 2 173 $$_[2]{'short'} ? :
181 2 7 unless my(@d) = map({[map({[$$_[0] . ($$_[2]{'short'} ? '/' : ''), $$_[1], $$_[2]{'line'}];} @$_)];} Algorithm::Diff::diff(\@wl1, \@wl2, sub { $_[0]{'window'}; } ))
190 0 18 ref $win ? :
196 12 1587 if $win_lb < 0
198 12 1587 if $win_ub > $max
200 1597 2 $win_ub < $max || !$$self{'last_line_short'} ? :
205 2 1597 $$self{'last_line_short'} && $_ == $max ? :
221 0 6 unless ref $patch eq 'VCS::Lite::Delta'
231 66 82 unless $ind =~ /^-/
232 0 82 if $out[$lin] ne $txt
243 18 2 @txt2 ? :
262 0 0 if @$a != @$b
265 0 0 if $$a[$_] ne $$b[$_]
303 2 13 exists $ins2{$_} ? :
305 2 7 @confl ? :
314 0 21 exists $ins1{$_} ? :
316 0 38 @confl ? :
333 9 807 if exists $ins1{$_}
335 48 768 if exists $ins2{$_}
339 0 816 if ($ins1 and $ins2 and not &_equal($ins1, $ins2)) { }
809 7 elsif (not $conflict_type) { }
351 54 755 if defined $ins1
359 2 814 if (not $conflict_type and $d1 eq '*')
366 0 816 if (not $conflict_type and $d2 eq '*')
375 9 807 if ($conflict_type == 1)
376 7 2 if ($d1 eq '*') { }
379 2 5 if $ins2
380 0 7 unless $d2
392 0 816 if ($conflict_type == 2)
393 0 0 if ($d2 eq '*') { }
396 0 0 if $ins1
397 0 0 unless $d1
408 8 808 unless defined $line
409 735 73 unless $d1 eq '-' || $d2 eq '-' and not $conflict_type