line |
true |
false |
branch |
39
|
3 |
1123 |
if ($class->excludes_role($role->name))
|
45
|
1 |
4 |
if ($class->does_role($excluded_role_name))
|
69
|
41 |
127 |
unless ($class->find_method_by_name($required_method_name))
|
71
|
1 |
40 |
if $self->is_aliased_method($required_method_name)
|
77
|
1094 |
28 |
unless @missing
|
84
|
10 |
18 |
if (@conflicts) { }
|
|
18 |
0 |
elsif (@missing) { }
|
95
|
2 |
16 |
if (my $meth = &first(sub {
|
120
|
2 |
655 |
if ($class->has_attribute($attribute_name) and $class->get_attribute($attribute_name) != $role->get_attribute($attribute_name)) { }
|
139
|
969 |
7731 |
if $method->isa("Class::MOP::Method::Meta")
|
141
|
7723 |
8 |
unless ($self->is_method_excluded($method_name))
|
145
|
13 |
7710 |
if $class_method and $class_method->body != $method->body
|
153
|
7705 |
13 |
unless $self->is_method_aliased($method_name)
|
159
|
2 |
11 |
if ($class_method and $class_method->body != $method->body)
|
183
|
3 |
994 |
if ($class->has_method($method_name)) { }
|