Branch Coverage

blib/lib/Future.pm
Criterion Covered Total %
branch 17 24 70.8


line true false branch
20 0 33 if (not $ENV{'PERL_FUTURE_NO_XS'} and eval { do { require Future::XS } }) { }
241 0 3 unless $cv->GV->NAME eq "__ANON__"
249 0 3 if ref $cop eq "B::NULL"
287 1 1 if (@values == 1 and builtin::blessed($values[0]) and $values[0]->isa(__PACKAGE__)) { }
319 9 98 unless eval { do { $f = &$code(@args); 1 } }
320 3 104 unless builtin::blessed($f) and $f->isa("Future")
477 1 0 unless (ref $exception or $exception =~ /\n$/u)
640 2 2 if (@values == 1 and builtin::blessed($values[0]) and $values[0]->isa(__PACKAGE__)) { }
644 1 1 unless wantarray
912 0 3 unless $xfrm_done
917 0 1 unless $xfrm_fail
1353 0 4 unless defined(my $btime = $self->btime) and defined(my $rtime = $self->rtime)