inc/Pegex/Base.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 36 | 40 | 90.0 |
line | true | false | branch |
---|---|---|---|
5 | 15 | 1757 | $#_ ? : |
30 | 21 | unless $#_ % 2 | |
24 | 9 | @_ == 1 ? : | |
0 | 17 | @_ == 2 && !$_[1] ? : | |
2 | 16 | unless exists $a{$n} | |
9 | 22 | if ($a{'required'}) | |
18 | 14 | unless my $b = $a{'builder'} | |
14 | 0 | exists $a{'lazy'} ? : | |
4 | 602 | unless $i | |
7 | 15 | !exists($_[0]{$n}) ? : | |
20 | 22 | $#_ ? : | |
7 | 18 | if not exists $$s{$_} | |
25 | 40 | unless exists $a{'default'} | |
24 | 11 | 'CODE' eq $r ? : | |
3 | 15 | 'ARRAY' eq $r ? : | |
6 | 7 | 'HASH' eq ($r = ref $d) ? : | |
7 | 6 | exists $a{'lazy'} ? : | |
27 | 18 | unless $i | |
14 | 0 | !exists($_[0]{$n}) ? : | |
0 | 14 | $#_ ? : |