Branch Coverage

blib/lib/PAGI/Context.pm
Criterion Covered Total %
branch 59 62 95.1


line true false branch
232 3 4 unless $got eq $want
258 2 4 exists $opts{'strict'} ? :
261 1 5 if ($strict and not exists $params->{$name})
263 1 0 @available ? :
297 10 15 if (lc $pair->[0] eq $name)
432 1 1 exists $self->{'scope'}{'pagi.session'} ? :
477 2 4 unless $conn
489 1 2 unless $conn
496 0 1 unless $conn
503 1 1 unless $conn
511 1 1 unless $t
518 1 1 unless $t
525 1 1 unless $t
532 1 1 if $t and $t->can("on_high_water")
539 1 1 if $t and $t->can("on_drain")
546 1 2 unless $t
548 0 2 unless defined $high
549 1 1 $t->buffered_amount < $high ? :
724 2 9 if (builtin::blessed($r) and $r->isa("Future"))
728 2 10 if ($@)
733 4 9 if (not @{$self->{'_on_error'};})
744 2 36 if $self->{'_running'}
759 9 47 if (my $err = $@)
771 20 27 if (@handlers) { }
2 25 elsif ($self->{'_on_default'} and not $terminal && $type eq $terminal) { }
1 46 elsif ($ENV{'PAGI_DEBUG'} and not $terminal && $type eq $terminal) { }
775 1 18 if (builtin::blessed($r) and $r->isa("Future"))
779 3 19 if (my $err = $@)
786 1 1 if (builtin::blessed($r) and $r->isa("Future"))
788 1 1 if (my $err = $@)
793 25 22 if ($terminal and $type eq $terminal)