Branch Coverage

blib/lib/ABNF/Generator/Liar.pm
Criterion Covered Total %
branch 33 60 55.0


line true false branch
56 0 1 unless @_ > 0
0 1 unless ($Method::Signatures::mutc{'cache'}{'ABNF::Grammar'} ||= 'Method::Signatures'->_make_constraint('ABNF::Grammar'))->check($_[0])
0 1 if @_ > 1 and not +($Method::Signatures::mutc{'cache'}{'ABNF::Validator'} ||= 'Method::Signatures'->_make_constraint('ABNF::Validator'))->check($_[1])
0 1 if @_ > 2
57 1 0 $validator ? :
76 0 20 unless @_ > 0
0 20 unless @_ > 1
0 20 if @_ > 2
79 20 0 if (my $prefix = splitRule($rule)) { }
93 0 22 unless @_ > 0
0 22 if @_ > 2
116 0 3 unless @_ > 0
0 3 unless ($Method::Signatures::mutc{'cache'}{'Str'} ||= 'Method::Signatures'->_make_constraint('Str'))->check($_[0])
0 3 if @_ > 1 and not +($Method::Signatures::mutc{'cache'}{'Str'} ||= 'Method::Signatures'->_make_constraint('Str'))->check($_[1])
2 1 @_ > 1 ? :
0 3 if @_ > 2
118 1 1 $$self{'_validator'}->validate($name, $result) ? :
133 0 1 if @_ > 0 and not +($Method::Signatures::mutc{'cache'}{'Str'} ||= 'Method::Signatures'->_make_constraint('Str'))->check($_[0])
0 1 @_ > 0 ? :
0 1 if @_ > 1
140 0 1 if $@
141 1 0 $result =~ /$rx/u ? :
156 0 2 unless @_ > 0
0 2 if @_ > 1 and not +($Method::Signatures::mutc{'cache'}{'Str'} ||= 'Method::Signatures'->_make_constraint('Str'))->check($_[1])
2 0 @_ > 1 ? :
0 2 if @_ > 2
157 1 1 unless $self->hasCommand($name)
161 0 1 if $@
162 0 1 $result =~ /$rx/u ? :
175 0 1 if @_ > 0