| line |
true |
false |
branch |
|
18
|
163 |
36 |
if (ref $type) { }
|
|
20
|
155 |
8 |
if blessed $type
|
|
21
|
2 |
6 |
if reftype $type eq 'CODE'
|
|
23
|
6 |
0 |
if (ref $type eq 'HASH')
|
|
26
|
6 |
0 |
if (1 == keys %$type)
|
|
36
|
1 |
5 |
if ($function eq 'union')
|
|
41
|
6 |
0 |
if ($function)
|
|
54
|
36 |
0 |
if blessed $obj
|
|
64
|
22 |
36 |
if (ref $code) { }
|
|
66
|
22 |
0 |
if reftype $code eq 'CODE'
|
|
67
|
0 |
0 |
if $INC{'overload.pm'} and overload::Method($code, '&{}')
|
|
71
|
18 |
18 |
exists &Sub::Quote::quote_sub ? :
|
|
74
|
0 |
36 |
unless $sub and reftype $sub eq 'CODE'
|
|
86
|
0 |
39 |
if $self->has_message
|
|
99
|
12 |
24 |
if $self->can('plus_coercions')
|
|
102
|
6 |
18 |
if $self->has_coercion
|
|
106
|
24 |
0 |
if (@new_coercions)
|
|
108
|
0 |
24 |
$new->isa('Type::Tiny') ? :
|
|
111
|
0 |
24 |
unless eval "require $class"
|
|
112
|
24 |
0 |
unless $new->has_coercion
|
|
127
|
9 |
9 |
unless _reify($a)->equals($n)
|
|
132
|
9 |
0 |
$self->has_coercion ? :
|
|
135
|
9 |
0 |
if (@keep)
|
|
137
|
3 |
6 |
$new->isa('Type::Tiny') ? :
|
|
140
|
0 |
9 |
unless eval "require $class"
|
|
141
|
9 |
0 |
unless $new->has_coercion
|
|
150
|
3 |
6 |
if $self->can('no_coercions')
|
|
157
|
0 |
6 |
unless $self->can('parameterize')
|
|
165
|
1 |
4 |
if $self->can('where')
|
|
202
|
0 |
102 |
unless ref $sub eq 'CODE'
|
|
205
|
102 |
0 |
if exists &Internals::SvREADONLY
|
|
208
|
0 |
17 |
if @subs
|
|
218
|
17 |
0 |
unless defined $args{'magic'}
|
|
220
|
17 |
0 |
if ($file ne '-e' and $args{'magic'} and eval {
do {
require B::Hooks::Parser
}
})
|
|
230
|
0 |
0 |
if ($args{'magic'} and $args{'magic'} ne 'auto')
|