| line |
true |
false |
branch |
|
17
|
4 |
26 |
&Scalar::Util::blessed($args{'for'}) ? : |
|
19
|
0 |
30 |
unless ($for) |
|
23
|
1 |
29 |
if (Mouse::Util::is_a_metarole($for)) { } |
|
34
|
0 |
30 |
unless keys %{$roles;} |
|
37
|
25 |
5 |
exists $roles->{$primary} ? : |
|
59
|
0 |
0 |
if $args->{'class_metaroles'} or $args->{'roles_metaroles'} |
|
62
|
0 |
0 |
if exists $args->{'for_class'} |
|
81
|
0 |
0 |
&Scalar::Util::blessed($args->{'for'}) ? : |
|
84
|
0 |
0 |
if (Mouse::Util::is_a_metaclass($for)) { } |
|
88
|
0 |
0 |
if exists $args->{'metaclass_roles'} |
|
94
|
0 |
0 |
if exists $args->{'metaclass_roles'} |
|
101
|
0 |
0 |
if exists $args->{$old_key} |
|
121
|
0 |
0 |
if $new_base ne $meta->name |
|
129
|
35 |
0 |
unless ($superclasses) |
|
130
|
0 |
35 |
unless $roles |
|
135
|
0 |
35 |
unless grep {not ref $_ || $meta->does_role($_);} @{$roles;} |
|
138
|
0 |
35 |
$superclasses ? : |