Branch Coverage

blib/lib/Eval/Reversible.pm
Criterion Covered Total %
branch 17 22 77.2


line true false branch
209 0 13 unless $code
211 1 12 unless (&blessed($self))
219 1 12 unless ($self->armed)
228 8 4 if (my $exception = $@)
230 7 1 if ($self->armed) { }
231 0 7 if $self->failure_warning
261 0 11 if $@
287 0 3 unless $code
290 2 1 if defined $fail_msg
305 0 11 unless $code
306 2 9 unless $Current_Reversible