| line |
true |
false |
branch |
|
24
|
205 |
0 |
if (builtin::blessed($self)) { }
|
|
39
|
30 |
4 |
if (builtin::blessed($_)) { }
|
|
44
|
0 |
16 |
unless scalar @tc == scalar @args
|
|
48
|
0 |
16 |
unless scalar @tc >= 2
|
|
74
|
3 |
268 |
if (ref $proto)
|
|
78
|
268 |
0 |
if (my $arg = shift @_) { }
|
|
79
|
210 |
58 |
if (builtin::blessed($arg) and $arg->isa('Moose::Meta::TypeConstraint')) { }
|
|
|
58 |
0 |
elsif (builtin::blessed($arg) and $arg->isa('MooseX::Types::UndefinedType')) { }
|
|
|
0 |
0 |
elsif (builtin::blessed($arg)) { }
|
|
105
|
966 |
0 |
if (builtin::blessed($self)) { }
|
|
106
|
0 |
966 |
if (defined(my $tc = shift @_))
|
|
125
|
65 |
96 |
builtin::blessed($self) ? :
|
|
140
|
15 |
39 |
builtin::blessed($self) ? :
|
|
193
|
686 |
10 |
if ($tc->can("is_subtype_of"))
|
|
196
|
16 |
686 |
if ($search_tc->isa("Moose::Meta::TypeConstraint::Class"))
|
|
201
|
670 |
16 |
unless $search_tc and $search_tc->is_subtype_of("Object")
|
|
206
|
3 |
693 |
if ($method eq 'new') { }
|
|
|
0 |
693 |
elsif ($class and not $tc->can($method)) { }
|
|
207
|
1 |
2 |
unless $class
|
|
209
|
1 |
1 |
unless $class->can("new")
|