Branch Coverage

blib/lib/Dallycot/Parser.pm
Criterion Covered Total %
branch 58 100 58.0


line true false branch
45 119 0 if (@_ == 2)
54 119 0 if (@_ == 2)
63 119 0 if (@_ == 2)
66 0 119 if (wantarray) { }
86 0 119 if ($@) { }
0 119 elsif (not $worked) { }
98 118 1 if ($parse) { }
128 3 128 if (@statements > 1) { }
141 1 2 if (blessed $href and $href->isa('Dallycot::Value::URI'))
164 7 1 $arity == 1 ? :
0 8 $arity == 0 ? :
344 0 22 if (ref $left_value eq $ops{$op} and ref $right_value eq ref $left_value) { }
6 16 elsif (ref $left_value eq $ops{$op}) { }
0 16 elsif (ref $right_value eq $ops{$op}) { }
364 0 1 if (ref $left_value eq 'Dallycot::AST::All') { }
376 0 1 if (ref $left_value eq 'Dallycot::AST::Any') { }
399 1 5 blessed $_ eq 'Dallycot::AST::Compose' ? :
406 1 6 if ($right_term->isa('Dallycot::AST::BuildMap')) { }
407 0 1 if ($left_term->isa('Dallycot::AST::BuildMap')) { }
432 0 3 if ($lit =~ s/\@([a-z][a-z](_[A-Z][A-Z])?)$//x)
481 2 18 if ($lit =~ s/\@([a-z][a-z](_[A-Z][A-Z])?)$//x)
509 0 0 defined $_ ? :
533 15 36 if ('HASH' eq ref $bindings) { }
560 4 140 if ($ident =~ /^P(\d+Y)?(\d+M)?(\d+D)?(T(\d+H)?(\d+M)?(\d+S)?)?$/)
563 5 19 defined $_ ? :
579 2 6 if ($ident =~ /^(xml)?ns:/)
580 2 0 if ($expression->isa('Dallycot::Value::String') or $expression->isa('Dallycot::Value::URI'))
621 2 3 if (ref $stream eq 'Dallycot::AST::Cons') { }
0 3 elsif (ref $scalar eq 'Dallycot::AST::Cons') { }
637 0 2 if (ref $first_stream eq 'Dallycot::AST::ListCons') { }
0 2 elsif (ref $second_stream eq 'Dallycot::AST::ListCons') { }
638 0 0 if (ref $second_stream eq 'Dallycot::AST::ListCons') { }
689 10 0 if (ref $args) { }
701 0 0 $args == 1 ? :
0 0 $args == 0 ? :
714 5 0 if (ref $args) { }
724 0 0 $args == 1 ? :
0 0 $args == 0 ? :
779 4 0 defined $otherwise ? :
817 3 12 if (blessed $value and $value->isa('Dallycot::AST::BuildList'))
841 1 10 if (ref $node eq 'Dallycot::AST::PropWalk') { }
891 0 1 if (ref $left_value eq 'Dallycot::AST::AnyProperty') { }
937 6 1 if ($thing->isa('Dallycot::AST::Union')) { }
948 0 0 if (@$constants) { }
963 0 8 if (ref $left_value eq $class) { }
0 8 elsif (ref $right_value eq $class) { }
964 0 0 if ($right_value eq $class) { }
1003 0 7 if (ref $vector eq 'Dallycot::AST::Index') { }
1015 0 0 if ($$vector[0] eq 'Push') { }
1084 1 3 if (ref $expression eq 'Dallycot::AST::TypePromotion') { }