Branch Coverage

inc/Pegex/Optimizer.pm
Criterion Covered Total %
branch 33 52 63.4


line true false branch
11 4 4 if $$tree{'+optimized'}
12 0 4 if $self->parser->{'maxparse'}
15 16 224 unless ref $node
30 28 536 defined $max ? :
564 32 unless defined $$node{'+min'}
32 32 536 defined $min ? :
568 28 unless defined $$node{'+max'}
34 588 8 unless defined $$node{'+asr'}
38 0 1064 if $kind eq 'xxx'
39 596 468 if ($$node{'rule'} = $$node{".$kind"})
42 304 292 if ($kind eq 'ref')
43 0 304 unless my $rule = $$node{'rule'}
44 0 304 if (my $method = $self->grammar->can("rule_$rule")) { }
0 304 elsif (not $self->grammar->{'tree'}{$rule}) { }
48 0 0 if (my $method = $self->grammar->can("$rule"))
60 0 596 unless $$node{'method'} ||= $self->parser->can("match_$kind")
65 132 464 if ($$node{'kind'} =~ /^(?:all|any)$/) { }
304 160 elsif ($$node{'kind'} eq 'ref') { }
160 0 elsif ($$node{'kind'} eq 'rgx') { }
72 112 192 if (my $action = $self->receiver->can("got_$ref")) { }
192 0 elsif (my $gotrule = $self->receiver->can('gotrule')) { }
78 0 304 if ($self->parser->{'debug'})
106 0 0 $asr == 1 ? :
0 0 $asr == -1 ? :
112 0 0 if ($result = $self->$method($ref, $parent)) { }
130 0 0 if $counter++ >= $maxparse