line |
true |
false |
branch |
51
|
4 |
2 |
if ($Moo::MAKERS{$target} and $Moo::MAKERS{$target}{'is_class'})
|
84
|
4 |
96 |
ref $name_proto eq 'ARRAY' ? :
|
85
|
4 |
96 |
if (@_ % 2 != 0)
|
91
|
4 |
94 |
@name_proto > 1 ? :
|
139
|
62 |
94 |
if ($INC{'Moo/HandleMoose.pm'} and not $Moo::sification::disabled)
|
166
|
28 |
22 |
if (not $self->SUPER::is_role($role) and ($INC{'Moose.pm'} and $meta = Class::MOP::class_of($role) and ref $meta ne "Moo::HandleMoose::FakeMetaClass" and $meta->isa("Moose::Meta::Role")) or "Mouse::Util"->can("find_meta") and $meta = Mouse::Util::find_meta($role) and $meta->isa("Mouse::Meta::Role"))
|
194
|
8 |
14 |
$is_mouse ? :
|
196
|
8 |
14 |
if ($spec->{'isa'})
|
200
|
2 |
6 |
$is_mouse ? :
|
221
|
4 |
4 |
if ($spec->{'coerce'})
|
254
|
42 |
174 |
if ($INFO{$role} and $INFO{$role}{'inhaled_from_moose'} or $INC{'Moo.pm'} and $m = "Moo"->_accessor_maker_for($target) and ref $m ne "Method::Generate::Accessor")
|
264
|
0 |
0 |
if ($INFO{$role} and $INFO{$role}{'inhaled_from_moose'})
|
276
|
2 |
40 |
unless $INFO{$role}{'attributes'}
|
279
|
32 |
4 |
if ($con_gen)
|
288
|
198 |
22 |
if ($INC{'Sub/Defer.pm'})
|
303
|
4 |
36 |
if ($INC{'Moo/HandleMoose.pm'} and not $Moo::sification::disabled)
|
310
|
40 |
56 |
if ($pack ne "Moo::Role" and $pack ne "Role::Tiny" and not $pack->isa($me))
|
322
|
22 |
14 |
unless $INFO{$_}{'attributes'}
|
328
|
0 |
12 |
unless $INC{'Moo.pm'} and @attrs and $con_gen = "Moo"->_constructor_maker_for($class) and $m = "Moo"->_accessor_maker_for($class)
|
340
|
0 |
18 |
if $seen{$name}++
|
343
|
4 |
14 |
unless $m->has_eager_default($name, $spec)
|
357
|
2 |
10 |
unless @set
|
380
|
22 |
2 |
unless (exists $APPLY_DEFAULTS{$class})
|
383
|
10 |
14 |
if (my $apply_defaults = $APPLY_DEFAULTS{$class})
|
400
|
86 |
134 |
unless my $new = $me->SUPER::_install_does($to)
|
406
|
14 |
10 |
if Role::Tiny::does_role($proto, $role)
|
409
|
4 |
2 |
if ($INC{'Moose.pm'} and $meta = Class::MOP::class_of($proto) and ref $meta ne "Moo::HandleMoose::FakeMetaClass" and $meta->can("does_role"))
|
422
|
92 |
130 |
unless $attr_info and @$attr_info
|
426
|
6 |
4 |
unless $info->{'attributes'}
|
427
|
2 |
114 |
unless $con->all_attribute_specs
|
|
116 |
2 |
$con ? :
|
|
10 |
118 |
$info ? :
|
435
|
10 |
118 |
if ($info) { }
|
|
116 |
2 |
elsif ($con) { }
|
440
|
118 |
118 |
ref $_ ? :
|