Branch Coverage

blib/lib/Pegex/Compiler.pm
Criterion Covered Total %
branch 25 34 73.5


line true false branch
15 0 10 if ($Pegex::Bootstrap)
49 10 0 unless (@rule)
50 10 0 if (my $rule = $self->{'tree'}{'+toprule'}) { }
70 8 37 if exists $self->{'_tree'}{$rule}
78 23 51 if (exists $object->{'.rgx'}) { }
38 13 elsif (exists $object->{'.ref'}) { }
3 10 elsif (exists $object->{'.any'}) { }
10 0 elsif (exists $object->{'.all'}) { }
0 0 elsif (exists $object->{'.err'}) { }
83 34 4 if (exists $self->{'tree'}{$rule}) { }
87 1 3 if (my $regex = Pegex::Grammar::Atoms::atoms()->{$rule})
125 0 20 unless $self->{'tree'}{$key} and $self->{'tree'}{$key}{'.rgx'} || die("'${key}' not defined as a single RE") or $atoms->{$key}
128 23 21 if $re eq $regexp->{'.rgx'}
144 84 64 if (ref $node eq 'HASH') { }
13 51 elsif (ref $node eq 'ARRAY') { }
145 23 61 if (exists $node->{'.rgx'}) { }
193 0 0 if $perl =~ /\?\^/