line |
true |
false |
branch |
42
|
0 |
9 |
unless not defined $$self{'_name'} or $$self{'_name'} =~ /^[a-z_]\w*$/i |
51
|
0 |
1 |
unless my $self = shift() |
57
|
0 |
1 |
unless $numArgs |
59
|
0 |
1 |
if $numArgs % 2 |
62
|
1 |
0 |
if ($arg eq 'prod') { } |
72
|
0 |
11 |
unless my $self = shift() |
79
|
10 |
1 |
if ($type and UNIVERSAL::isa($arg, $prodType)) { } |
|
1 |
0 |
elsif ($type eq 'ARRAY') { } |
87
|
0 |
10 |
if defined $$prod{'_rule'} |
95
|
0 |
0 |
unless my $self = shift() |
96
|
0 |
0 |
unless $self->grammar |
107
|
0 |
0 |
unless my $self = shift() |
111
|
0 |
0 |
if ($firstProd) { } |
123
|
0 |
200 |
unless my $self = shift() |
124
|
0 |
200 |
defined $self->name ? : |
128
|
200 |
200 |
if ($firstProd) { } |
139
|
0 |
805 |
unless my $self = shift() |
145
|
0 |
805 |
if defined $self->name and defined $args{'vals'}{$self->name} |
146
|
0 |
805 |
if defined $args{'vals'}{$self} |
150
|
0 |
1408 |
if $prod->containsVals(%args) |
152
|
805 |
0 |
unless @prods |
160
|
0 |
202 |
unless my $self = shift() |
165
|
0 |
202 |
if defined $self->name and defined $args{'vals'}{$self->name} |
166
|
0 |
202 |
if defined $args{'vals'}{$self} |
169
|
0 |
404 |
if $prod->containsVals(%args) |
178
|
0 |
1209 |
unless my $self = shift() |
183
|
0 |
1 |
unless my $self = shift() |
188
|
0 |
1812 |
unless my $self = shift() |
193
|
0 |
0 |
unless my $self = shift() |
195
|
0 |
0 |
unless defined $prodIdent |
198
|
0 |
0 |
if ($isNumber and $$prod{'_number'} == $prodIdent or defined $$prod{'_name'} and $$prod{'_name'} eq $prodIdent) |