line |
true |
false |
branch |
18
|
2 |
13 |
if exists $COMPOSITE_NAME{$key} |
36
|
0 |
13 |
if ($COMPOSITE_KEY{$new_name} or length $new_name > 252) |
56
|
9 |
0 |
defined $type ? : |
67
|
0 |
9 |
unless eval $code |
69
|
0 |
9 |
if defined $e |
87
|
1 |
8 |
if ($INC{'Moo/Role.pm'} and 'Moo::Role'->is_role($base)) { } |
|
2 |
6 |
elsif ($INC{'Moo.pm'} and 'Moo'->_accessor_maker_for($base)) { } |
|
0 |
6 |
elsif ($INC{'Class/MOP.pm'} and $meta = Class::MOP::class_of($base) and $meta->isa('Moose::Meta::Role')) { } |
|
0 |
6 |
elsif ($INC{'Class/MOP.pm'} and $meta = Class::MOP::class_of($base) and $meta->isa('Class::MOP::Class')) { } |
|
0 |
6 |
elsif (defined &Mouse::Util::find_meta and $meta = Mouse::Util::find_meta($base) and $meta->isa('Mouse::Meta::Role')) { } |
|
0 |
6 |
elsif (defined &Mouse::Util::find_meta and $meta = Mouse::Util::find_meta($base) and $meta->isa('Mouse::Meta::Class')) { } |
|
1 |
5 |
elsif ($INC{'Role/Tiny.pm'} and 'Role::Tiny'->is_role($base)) { } |
136
|
5 |
0 |
if ($INC{'Role/Tiny.pm'} and not grep((!'Role::Tiny'->is_role($_)), @roles)) { } |
151
|
0 |
11 |
unless @roles |
156
|
10 |
1 |
unless $BASE{$base} |
158
|
1 |
10 |
$self->can('ROLE_BASE') ? : |
166
|
9 |
2 |
unless (exists $BASE{$new}) |
167
|
0 |
9 |
unless my $type = _detect_type($base, @roles) |
170
|
2 |
2 |
$type =~ /Role/ ? : |
|
5 |
4 |
$type eq 'Role::Tiny::With' ? : |
182
|
2 |
9 |
if (ref $self) |