Branch Coverage

blib/lib/TestML1/Compiler/Pegex/AST.pm
Criterion Covered Total %
branch 25 30 83.3


line true false branch
37 135 150 if (ref $_ eq 'TestML1::Assertion') { }
45 150 0 $expression ? :
135 15 $assertion ? :
47 103 @$points ? :
55 418 0 if @$list
61 330 88 if @$calls == 1
89 0 97 unless $point =~ s/^\*//
100 0 135 if ref $call eq 'ARRAY'
103 135 66 if ($expr = $$call{"assertion_$_"})
111 106 29 $expr ? :
138 10 10 if (ref $object->[0] and ref $object->[0][0])
155 55 169 if ($args)
158 0 68 $_->isa('TestML1::Expression') && @{$_->calls;} == 1 && ($_->calls->[0]->isa('TestML1::Point') || $_->calls->[0]->isa('TestML1::Object')) ? :
196 27 113 $value =~ s/(\r?\n)\s*\z// ? :
197 139 1 if (length $value)