Branch Coverage

blib/lib/VCS/Rcs/YappRcsParser.pm
Criterion Covered Total %
branch 34 72 47.2


line true false branch
67 0 8 if exists $$self{'VERSION'} and $$self{'VERSION'} < $Parse::Yapp::Driver::COMPATIBLE
73 0 8 if ref $class
85 0 8 if ($$self{'DEBUG'}) { }
88 0 0 if $@
99 0 0 unless exists $$self{'USER'}
151 0 0 if $index < 0 and -$index <= @{$$self{'STACK'};}
161 0 0 if @_
169 0 0 if @_
198 0 48 unless exists $$checklist{$prm}
200 0 48 unless ref $value eq $$checklist{$prm}
206 0 24 unless exists $$outhash{$_}
219 0 0 if exists ${'Parse::Yapp::Driver::';}{'_DBParse'}
224 0 0 unless open DRV, "<$fname"
227 0 0 if (/^\s*sub\s+_Parse\s*{\s*$/ .. /^\s*}\s*#\s*_Parse\s*$/)
283 1424 568 if (exists $$actions{'ACTIONS'}) { }
286 1328 96 unless (defined $$token)
292 96 0 exists $$actions{'DEFAULT'} ? :
1328 96 exists $$actions{'ACTIONS'}{$$token} ? :
305 1992 0 if (defined $act)
308 1328 664 if ($act > 0)
314 0 1328 if ($$errstatus)
329 1320 8 if $$token ne ''
342 8 656 unless $act
348 320 344 if (unpack('A1', $lhs) eq '@')
349 0 320 unless $lhs =~ /^\@[0-9]+\-([0-9]+)$/
356 512 152 $$dotpos ? :
359 56 144 @sempar ? :
464 200 $code ? :
365 8 656 if ($$check eq 'ACCEPT')
374 0 656 if ($$check eq 'ABORT')
387 656 0 unless ($$check eq 'ERROR')
415 0 0 unless ($$errstatus)
419 0 0 unless $$errstatus
433 0 0 if ($$errstatus == 3)
435 0 0 if ($$token eq '')
461 0 0 unless (@$stack)