| line |
true |
false |
branch |
|
33
|
4 |
0 |
if $start |
|
38
|
4 |
0 |
!ref($input) ? : |
|
42
|
4 |
0 |
unless $$self{'input'}{'_is_open'} |
|
46
|
0 |
4 |
unless $$self{'grammar'} |
|
51
|
0 |
4 |
unless my $start_rule_ref = $start || $$self{'grammar'}{'tree'}{'+toprule'} || $$self{'grammar'}{'tree'}{'TOP'} & 'TOP' |
|
56
|
0 |
4 |
unless $$self{'receiver'} |
|
71
|
0 |
4 |
if ($$self{'receiver'}->can('initial')) |
|
77
|
0 |
4 |
$self->debug ? : |
|
84
|
0 |
4 |
if (not $match or $$self{'position'} < length ${$$self{'buffer'};}) |
|
89
|
4 |
0 |
if ($$self{'receiver'}->can('final')) |
|
108
|
646 |
0 |
unless $assertion |
|
111
|
607 |
39 |
if $max == 1 |
|
113
|
2 |
522 |
if (not $count and $min == 0 and $kind eq 'all') |
|
116
|
32 |
1112 |
if ($max != 1) |
|
117
|
3 |
29 |
if ($$next{-'flat'}) { } |
|
118
|
3 |
0 |
ref $_ eq 'ARRAY' ? : |
|
123
|
0 |
32 |
if ($$self{'position'} = $position) > $$self{'farthest'} |
|
128
|
488 |
656 |
if (not $result or $assertion) |
|
129
|
0 |
488 |
if ($$self{'position'} = $position) > $$self{'farthest'} |
|
133
|
7 |
662 |
$$next{'-skip'} ? : |
|
|
669 |
475 |
$result ? : |
|
139
|
0 |
0 |
if $position > $$self{'farthest'} |
|
141
|
0 |
0 |
if @$match > 1 |
|
143
|
0 |
0 |
unless my $rule = $$self{'grammar'}{'tree'}{$ref} |
|
151
|
0 |
562 |
unless my $rule = $$self{'grammar'}{'tree'}{$ref} |
|
153
|
258 |
304 |
unless my $match = $self->match_next($rule) |
|
154
|
0 |
304 |
unless $$rule{'action'} |
|
167
|
157 |
219 |
unless $$buffer =~ /$regexp/g |
|
171
|
173 |
46 |
if $$self{'position'} > $$self{'farthest'} |
|
176
|
0 |
219 |
if $#+ > 1 |
|
187
|
308 |
90 |
if (my $match = $self->match_next($elem)) { } |
|
188
|
288 |
20 |
unless ($$elem{'+asr'} or $$elem{'-skip'}) |
|
194
|
0 |
90 |
if ($$self{'position'} = $position) > $$self{'farthest'} |
|
199
|
70 |
0 |
if $len > 1 |
|
206
|
57 |
127 |
if (my $match = $self->match_next($elem)) |
|
220
|
0 |
0 |
$action =~ /^try_/ ? : |
|
222
|
0 |
0 |
unless $indent |
|
224
|
0 |
0 |
if $indent |
|
226
|
0 |
0 |
if length $snippet > 30 |
|
229
|
0 |
0 |
$indent ? : |
|
236
|
0 |
0 |
unless $$self{'throw_on_error'} |
|
250
|
0 |
0 |
$position < 50 ? : |
|
|
0 |
0 |
$position < 50 ? : |