Branch Coverage

blib/lib/CPS.pm
Criterion Covered Total %
branch 19 24 79.1


line true false branch
43 16 0 if (eval { do { require Sub::Name } }) { }
175 0 23 unless my $enter = $gov->can('enter')
184 60 6 if ($sync) { }
191 60 29 if ($do_again)
225 9 26 unless $idx < scalar @$items
278 8 1 if @stack
310 8 1 if @queue
343 0 5 unless $gov->can('enter')
348 5 9 if $sync
431 0 2 unless my $enter = $gov->can('enter')
484 0 153 unless my $code = $pkg->can($func)
595 1 2 wantarray ? :