Condition Coverage

blib/lib/Type/Params/Signature.pm
Criterion Covered Total %
condition 90 119 75.6


and 3 conditions

line !l l&&!r l&&r condition
57 277 2 8 $self->{'named_to_list'} and not ref $self->{'named_to_list'}
77 131 114 37 defined $self->{'bless'} and $self->{'bless'} eq 1
245 7 30 defined $self->{'bless'} and $self->{'bless'} eq 1 and not $self->{'named_to_list'}
129 0 24 1 $constraint->type_parameter and $constraint->type_parameter->{'uniq'} == &Any()->{'uniq'}
157 213 68 1 $self->{'slurpy'} and $self->{'slurpy'}->has_default
175 676 0 2 is_HashRef($list->[0]) and exists $list->[0]{'slurpy'}
0 0 2 is_HashRef($list->[0]) and exists $list->[0]{'slurpy'} and not is_Bool($list->[0]{'slurpy'})
184 50 5 2 exists $list->[0]{'slurpy'} and not is_Bool($list->[0]{'slurpy'})
205 287 0 379 is_HashRef($_[0]) and not exists $_[0]{'slurpy'}
375 274 4 1 defined $self->strictness and $self->strictness eq 1
399 398 8 1 $seen_optional and not $is_named
461 45 16 67 defined $max_args and $min_args == $max_args
26 27 8 $min_args and defined $max_args
620 0 44 1 $real_type and $real_type->{'uniq'} == &Any()->{'uniq'}
674 125 0 0 $self->has_strictness and not $self->strictness
683 125 0 0 defined $self->strictness && $self->strictness ne 1
699 251 15 28 $self->bless and $self->oo_trace
702 0 0 28 defined $package and defined $subname
914 27 0 18 $self->is_named and $self->bless
27 5 13 $self->is_named and $self->bless and not $self->named_to_list

or 2 conditions

line l !l condition
45 287 0 $self->{'parameters'} ||= []
46 0 287 $self->{'class_prefix'} ||= "Type::Params::OO::Klass"
71 0 26 $self->{'head'} ||= []
487 27 26 $min_args || 0
27 26 $min_args || 0
739 16 8 $self->constructor || 'new'
875 0 30 $ENV{'PERL_TYPE_PARAMS_XS'} || 'XS'

or 3 conditions

line l !l&&r !l&&!r condition
79 15 15 0 $klass_cache{$klass_key} ||= sprintf("%s%d", $self->{'class_prefix'}, ++$klass_id)
129 1 23 1 $constraint->type_parameter and $constraint->type_parameter->{'uniq'} == &Any()->{'uniq'} or $constraint->my_slurp_into eq "HASH"
151 3 0 176 $parameter->type->is_strictly_a_type_of(&Slurpy()) or $parameter->{'slurpy'}
228 115 22 171 delete $opts->{'positional'} || delete $opts->{'pos'}
230 1 17 290 delete $opts->{'multiple'} || delete $opts->{'multi'}
232 137 153 18 $positional or $named
290 16 2 $positional or $named or $multiple
283 45 18 84 $_[0]->slurpy || grep($_->might_supply_new_value, @{$_[0]->parameters;})
288 0 295 2 $_[0]{'coderef'} ||= $_[0]->_build_coderef
293 5 292 0 $self->description || sprintf(q[parameter validation for '%s::%s'], $self->package || '', $self->subname || '__ANON__')
633 29 0 0 $real_type || $constraint
767 19 0 263 $args{'is_early'} or not exists $args{'is_early'}
805 672 0 0 $args{'display_var'} || $args{'varname'}
838 13 30 0 $self->{'class_attributes'} ||= $self->_build_class_attributes
876 0 0 30 $env eq "PP" or $ENV{'PERL_ONLY'}