line |
true |
false |
branch |
61
|
2 |
5 |
unless $meta
|
68
|
49 |
73 |
if (&try(sub {
|
74
|
3 |
70 |
unless defined $meta
|
75
|
12 |
58 |
unless $meta->can("does_role")
|
76
|
52 |
6 |
if $meta->does_role($role)
|
85
|
0 |
8 |
unless defined $meta
|
87
|
4 |
4 |
&blessed($role) ? :
|
93
|
0 |
12 |
unless defined $_meta
|
95
|
0 |
12 |
unless $_meta->roles
|
96
|
6 |
0 |
if $role->name eq $role_name
|
120
|
3 |
1641 |
unless (@_)
|
134
|
54 |
260 |
unless not ref $_[0]
|
142
|
26 |
1898 |
if (&blessed($role->[0])) { }
|
150
|
3 |
1917 |
unless ($meta and $meta->isa("Moose::Meta::Role"))
|
157
|
2 |
1632 |
if (defined $role_filter)
|
161
|
2 |
1632 |
unless @role_metas
|
163
|
1 |
1631 |
unless &blessed($applicant) or Class::MOP::class_of($applicant)
|
167
|
1626 |
6 |
&blessed($applicant) ? :
|
169
|
1406 |
226 |
if (scalar @role_metas == 1) { }
|
171
|
27 |
1379 |
defined $params ? :
|
180
|
1 |
4 |
unless @roles
|
215
|
191 |
27 |
$trait ? :
|
228
|
471 |
27 |
$options{'trait'} ? :
|
230
|
292 |
206 |
if $cache{$cache_key}{$metaclass_name}
|
239
|
81 |
249 |
if ($package->can('register_implementation')) { }
|
|
121 |
128 |
elsif (find_meta($package)) { }
|
259
|
411 |
2 |
$class_or_obj->can('add_before_method_modifier') ? :
|
265
|
7 |
406 |
if (my $method_modifier_type = ref $args->[0]) { }
|
266
|
3 |
4 |
if ($method_modifier_type eq 'Regexp') { }
|
|
2 |
2 |
elsif ($method_modifier_type eq 'ARRAY') { }
|
305
|
15 |
103 |
if @items == 1
|
306
|
50 |
53 |
if @items == 2
|
316
|
0 |
1930 |
@_ ? :
|
351
|
4 |
8230 |
$opts && $opts->{'-version'} ? :
|
356
|
0 |
408 |
unless defined $_[0]
|
357
|
187 |
221 |
unless ref $_[0]
|
358
|
24 |
197 |
if overload::OverloadedStringify($_[0])
|
373
|
3 |
58 |
unless @role_differences
|
387
|
0 |
64 |
$_->isa('Moose::Meta::Role::Composite') ? :
|
392
|
0 |
0 |
$super_meta_name->meta->can('roles') ? :
|
|
61 |
0 |
$super_meta_name->meta->can('_roles_with_inheritance') ? :
|
396
|
3 |
64 |
$_->isa('Moose::Meta::Role::Composite') ? :
|
401
|
0 |
0 |
$class_meta_name->meta->can('roles') ? :
|
|
61 |
0 |
$class_meta_name->meta->can('_roles_with_inheritance') ? :
|
406
|
58 |
12 |
unless &any(sub {
|
417
|
0 |
63 |
unless defined $common_base_name
|
426
|
2 |
61 |
unless &all(sub {
|
434
|
0 |
63 |
unless defined $meta1 and defined $meta2
|
452
|
126 |
137 |
if $ancestor_name eq $until_name
|
465
|
0 |
133 |
unless @parent_names == 1
|
471
|
133 |
0 |
$meta->can('calculate_all_roles') ? :
|
476
|
2 |
131 |
unless @roles
|
482
|
131 |
38 |
if $method->isa("Class::MOP::Method::Meta")
|
484
|
26 |
12 |
if $method->can("associated_attribute")
|
486
|
9 |
3 |
if $meta->can("does_role") and $meta->does_role($method->original_package_name)
|
498
|
3 |
0 |
if $method->isa("Class::MOP::Method::Wrapped") and (!scalar($method->around_modifiers) || &any(sub {
|
510
|
26 |
0 |
if &any(sub {
|