| line |
true |
false |
branch |
|
28
|
9 |
10 |
ref $_[0] ? : |
|
31
|
0 |
7 |
ref $def->{'isa'} ? : |
|
|
7 |
12 |
$def->{'isa'} ? : |
|
44
|
0 |
19 |
if $CLASSES{$subclass} |
|
50
|
3 |
4 |
unless (keys %{"${parent}::";}) |
|
94
|
0 |
0 |
unless exists $needs->{$subclass} or $CLASSES{$subclass} or keys %{"${subclass}::";} |
|
99
|
3 |
1 |
if $CLASSES{$c} or keys %{"${c}::";} |
|
102
|
0 |
1 |
if $seen->{$subclass} |
|
109
|
1 |
3 |
if $CLASSES{$subclass} or keys %{"${subclass}::";} |
|
125
|
19 |
0 |
if ($def->{'isa'}) |
|
126
|
19 |
0 |
ref $def->{'isa'} ? : |
|
143
|
1 |
18 |
if ($def->{'description'}) |
|
154
|
4 |
15 |
if (my $fields = $def->{'fields'}) |
|
156
|
3 |
1 |
ref $fields && &reftype($fields) eq 'ARRAY' ? : |
|
168
|
2 |
17 |
if (my $alias = $def->{'alias'}) |
|
170
|
0 |
2 |
unless defined $Exception::Class::Caller |
|
179
|
0 |
19 |
if (my $defaults = $def->{'defaults'}) |
|
189
|
0 |
19 |
if $@ |
|
200
|
3 |
2 |
unless $_[1] |
|
202
|
1 |
1 |
unless &blessed($e) and $e->isa($_[1]) |