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 279 2 9 $self->{'named_to_list'} and not ref $self->{'named_to_list'}
77 133 114 38 defined $self->{'bless'} and $self->{'bless'} eq 1
247 8 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 216 68 1 $self->{'slurpy'} and $self->{'slurpy'}->has_default
175 684 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 53 5 2 exists $list->[0]{'slurpy'} and not is_Bool($list->[0]{'slurpy'})
205 290 0 382 is_HashRef($_[0]) and not exists $_[0]{'slurpy'}
375 277 4 1 defined $self->strictness and $self->strictness eq 1
399 403 8 1 $seen_optional and not $is_named
461 45 18 67 defined $max_args and $min_args == $max_args
26 27 10 $min_args and defined $max_args
620 0 44 1 $real_type and $real_type->{'uniq'} == &Any()->{'uniq'}
674 126 0 0 $self->has_strictness and not $self->strictness
683 126 0 0 defined $self->strictness && $self->strictness ne 1
699 254 16 28 $self->bless and $self->oo_trace
702 0 0 28 defined $package and defined $subname
914 29 0 19 $self->is_named and $self->bless
29 6 13 $self->is_named and $self->bless and not $self->named_to_list

or 2 conditions

line l !l condition
45 290 0 $self->{'parameters'} ||= []
46 0 290 $self->{'class_prefix'} ||= "Type::Params::OO::Klass"
71 0 29 $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 181 $parameter->type->is_strictly_a_type_of(&Slurpy()) or $parameter->{'slurpy'}
228 117 22 173 delete $opts->{'positional'} || delete $opts->{'pos'}
230 2 17 293 delete $opts->{'multiple'} || delete $opts->{'multi'}
232 139 154 19 $positional or $named
293 17 2 $positional or $named or $multiple
283 45 20 85 $_[0]->slurpy || grep($_->might_supply_new_value, @{$_[0]->parameters;})
288 0 299 2 $_[0]{'coderef'} ||= $_[0]->_build_coderef
293 5 296 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 265 $args{'is_early'} or not exists $args{'is_early'}
805 683 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'}