| line |
true |
false |
branch |
|
37
|
0 |
102 |
if ref $attr_name |
|
43
|
4 |
98 |
if ($attr_name =~ /^\+(\S+)$/) |
|
47
|
0 |
4 |
unless exists $$inherited_attrs{$attr_name} |
|
60
|
1 |
99 |
if ($handles and ref $handles eq 'HASH') |
|
68
|
2 |
0 |
if ($self->$attr_name->can($handle)) { } |
|
80
|
1 |
99 |
if ($predicate) |
|
87
|
1 |
99 |
if ($clearer) |
|
97
|
0 |
26 |
unless @mothers |
|
134
|
10 |
84 |
if $caller eq 'main' |
|
148
|
0 |
84 |
if grep /^$class_name$/, Coat::Types::list_all_builtin_type_constraints() |
|
170
|
0 |
0 |
if (defined &{$class . '::' . $name;}) |
|
176
|
0 |
0 |
if $@ |
|
177
|
0 |
0 |
if $pkg_name ne 'Coat' |
|
194
|
0 |
228 |
if (defined $self) { } |
|
218
|
185 |
91 |
if (@_ > 1) { } |
|
219
|
0 |
185 |
if $$meta{'is'} eq 'ro' |
|
225
|
1 |
142 |
if defined $$meta{'trigger'} |
|
233
|
6 |
85 |
if $$meta{'lazy'} and not defined $$self{$name} |
|
250
|
9 |
5 |
unless @_ |
|
275
|
16 |
16 |
if defined &$coderef |
|
279
|
0 |
16 |
unless defined $super |
|
302
|
2 |
4 |
wantarray ? : |
|
|
6 |
3 |
defined wantarray ? : |
|
311
|
3 |
6 |
unless defined wantarray |
|
312
|
2 |
4 |
wantarray ? : |
|
323
|
0 |
110 |
unless defined $class |
|
328
|
4 |
109 |
unless ('Coat::Meta'->exists($mother)) |
|
330
|
1 |
3 |
if $@ |