line |
true |
false |
branch |
26
|
24 |
0 |
unless ("Moo::Role"->is_role($target))
|
29
|
0 |
0 |
unless ($target->can("request_metadata"))
|
40
|
0 |
24 |
if Role::Tiny::does_role($target, $default_role)
|
53
|
36 |
66 |
if (&Scalar::Util::blessed($_[0])) { }
|
67
|
48 |
12 |
unless ($opts{'required'})
|
68
|
0 |
48 |
if (exists $opts{'predicate'}) { }
|
76
|
60 |
0 |
if (my $info = delete $opts{'property'})
|
77
|
60 |
0 |
unless (ref $info || '') eq "HASH"
|
78
|
48 |
12 |
if defined $predicate
|
79
|
60 |
0 |
unless exists $info->{'omit_empty'}
|
85
|
24 |
0 |
if $target->can("has")
|
92
|
0 |
30 |
if ('Moo::Role'->is_role($target) or $target->can("${type}_metadata")) { }
|