Branch Coverage

blib/lib/Data/NFA.pm
Criterion Covered Total %
branch 81 94 86.1


line true false branch
116 55 49 if (not ref $expr) { }
121 10 39 if ($structure eq Element()) { }
4 35 elsif ($structure eq Sequence()) { }
2 33 elsif ($structure eq Optional()) { }
11 22 elsif ($structure eq ZeroOrMore()) { }
2 20 elsif ($structure eq OneOrMore()) { }
18 2 elsif ($structure eq Choice()) { }
2 0 elsif ($structure eq Except()) { }
152 17 18 if ($i)
156 17 18 if ($i < $#elements)
166 0 4 ref $_ ? :
172 2 2 if $i
174 2 2 if ($i < $#elements)
196 282 67 unless (defined $state->final)
197 282 0 if (defined $state->jumps)
200 38 519 if (defined(my $final = $jump->final))
209 20 9 unless $changes
221 984 1587 if $checked{$stateName}++
222 0 1587 unless my $state = $states->{$stateName}
236 241 201 unless keys %{$$state{$_}}
238 163 58 unless defined $state->{'final'}
248 45 17 if (ref $expr) { }
249 6 39 if $expr->[0] eq Element()
252 20 48 ref $_ ? :
278 66 167 defined $state->final ? :
289 145 88 @j ? :
294 21 0 $title ? :
316 145 88 if @j > 0
319 21 0 $j ? :
321 0 21 if -e $logFile
329 7 21 if ($d->transitions)
339 1 1 defined $f ? :
351 874 1367 if $checked{$stateName}++
352 0 1367 unless my $state = $states->{$stateName}
354 575 792 if ($state->transitions)
355 178 397 if (my $t = $state->transitions->{$symbol})
383 74 57 if $checked{$stateName}++
385 0 57 unless $state
388 15 42 if (defined(my $to = $transitions->{$symbol}))
393 57 0 if (my $jumps = $state->jumps)
411 120 441 if (defined(my $final = $states->{$stateName}->final))
412 40 80 unless @symbols
415 64 457 unless @symbols
422 89 375 if $result
1286 0 1 if eval "eof(${p}::DATA)"
1288 0 1 if $@
1290 0 1 if $@