line |
true |
false |
branch |
28
|
2 |
0 |
unless exists $opts->{'name'}
|
29
|
1 |
1 |
unless exists $opts->{'class'}
|
35
|
0 |
2 |
$INC{'Type/Registry.pm'} ? :
|
|
2 |
0 |
unless ref $caller or $caller eq "-lexical" or $globals->{'lexical'}
|
41
|
3 |
206 |
if &blessed($proto)
|
43
|
3 |
203 |
@_ == 1 ? :
|
44
|
1 |
205 |
unless exists $opts{'class'}
|
49
|
205 |
0 |
if $xsub
|
70
|
67 |
0 |
if &blessed($_)
|
84
|
116 |
619 |
if $Type::Tiny::AvoidCallbacks
|
86
|
619 |
0 |
if $xsub
|
100
|
1 |
1 |
if $self->is_anon
|
122
|
1 |
2 |
unless (@_)
|
135
|
0 |
4 |
unless Types::TypeTiny::is_TypeTiny($source)
|
139
|
0 |
4 |
unless Types::TypeTiny::is_StringLike($constructor)
|
166
|
76 |
35 |
if (@isa == 0)
|
171
|
31 |
4 |
if (@isa == 1)
|
206
|
0 |
1 |
unless defined $varname
|
208
|
0 |
1 |
if $self->check($value)
|
209
|
0 |
1 |
unless &blessed($value)
|
213
|
1 |
0 |
$varname eq '$_' ? :
|