Condition Coverage

blib/lib/Type/Coercion.pm
Criterion Covered Total %
condition 67 101 66.3


and 3 conditions

line !l l&&!r l&&r condition
39 4 10 3 "Sub::Quote"->can("quote_sub") and $self->can_be_inlined
42 2 1 0 $self->{'_overload_coderef'} and $self->{'_sub_quoted'}++
129 0 0 2 &blessed($x) and &blessed($y)
0 0 2 &blessed($x) and &blessed($y) and $x->isa($class)
0 0 2 &blessed($x) and &blessed($y) and $x->isa($class) and $y->isa($class)
138 0 0 2 $x->has_type_constraint and $y->has_type_constraint
0 0 2 $x->has_type_constraint and $y->has_type_constraint and $x->type_constraint == $y->type_constraint
0 0 0 $x->has_type_constraint and $y->has_type_constraint
167 969 0 43 $self->has_library and not $self->is_anon
204 2 13 2 $self->has_type_constraint and $type->is_a_type_of($self->type_constraint)
219 0 5 1 $self->has_type_constraint and $self->type_constraint->check(@_)
240 0 1903 1 &blessed($type) and my $method = $type->can("type_coercion_map")
318 0 1540 82 $self->has_type_constraint and not $self->type_constraint->can_be_inlined
369 689 684 22 defined $codes[$i] && $varname eq '$_'
472 35 0 6 $INC{'Moose.pm'} and &blessed($self)
35 4 2 $INC{'Moose.pm'} and &blessed($self) and $_[0] eq "Moose::Meta::TypeCoercion"
479 35 0 4 $INC{'Moose.pm'} and &blessed($self)
35 3 1 $INC{'Moose.pm'} and &blessed($self) and $_[0] =~ /^(Class::MOP|MooseX?)::/
496 1 0 3 $INC{'Moose.pm'} and &blessed($self)
1 1 2 $INC{'Moose.pm'} and &blessed($self) and my $method = $self->moose_coercion->can(@_)
511 0 0 2 $INC{'Moose.pm'} and &blessed($self)
0 1 1 $INC{'Moose.pm'} and &blessed($self) and my $method = $self->moose_coercion->can($m)
527 1 0 1 &blessed($thing) and $thing->isa("Type::Coercion")

or 2 conditions

line l !l condition
46 6 8 $self->{'_overload_coderef'} ||= sub {
57 301 13203 delete $params{'type_coercion_map'} || []
91 11548 12313 $_[0]{'type_coercion_map'} ||= []
97 2987 1347 $_[0]{'frozen'} ||= 0

or 3 conditions

line l !l&&r !l&&!r condition
69 892 0 0 $self->name =~ /^_{0,2}[A-Z][A-Za-z0-9_]+$/ms or eval " use 5.008; \$self->name =~ /^_{0,2}\\p{Lu}[\\p{L}0-9_]+\$/sm "
85 602 117 0 $_[0]{'display_name'} ||= $_[0]->_build_display_name
89 5357 3 5 $_[0]{'type_constraint'} ||= $_[0]->_maybe_restore_type_constraint
92 7 19 1 $_[0]{'moose_coercion'} ||= $_[0]->_build_moose_coercion
95 927 682 0 $_[0]{'compiled_coercion'} ||= $_[0]->_build_compiled_coercion
151 0 2 0 $opts{'display_name'} ||= "$x+$y"
247 1619 284 0 Types::TypeTiny::is_StringLike($coercion) or Types::TypeTiny::is_CodeLike($coercion)
518 1 0 0 ref $self || $self