| line |
true |
false |
branch |
|
20
|
0 |
4 |
unless ($obj_class) |
|
28
|
0 |
4 |
unless ($obj_class->isa($pkg)) |
|
35
|
0 |
4 |
if (ref $_arg eq 'ARRAY') { } |
|
43
|
0 |
4 |
unless (@arg_objs) |
|
49
|
0 |
4 |
unless (exists $herit->{$pkg}) |
|
56
|
0 |
4 |
exists $$objects{$$self} ? : |
|
60
|
0 |
3 |
unless ($arg_class) |
|
64
|
0 |
3 |
if ($obj_class->Object::InsideOut::SUPER::isa($arg_class) or $arg_class->isa($obj_class)) |
|
85
|
0 |
0 |
unless ($obj_class) |
|
93
|
0 |
0 |
unless ($obj_class->isa($pkg)) |
|
98
|
0 |
0 |
unless (exists $GBL->{'heritage'}{$pkg} and exists $GBL->{'heritage'}{$pkg}{'obj'}{$$self}) |
|
105
|
0 |
0 |
if (@_) { } |
|
117
|
0 |
0 |
if (wantarray) |
|
120
|
0 |
0 |
if (@objs == 1) |
|
133
|
0 |
0 |
unless ($class) |
|
141
|
0 |
0 |
unless ($class->isa($pkg)) |
|
148
|
0 |
0 |
if (ref $_arg eq 'ARRAY') { } |
|
156
|
0 |
0 |
unless (@args) |
|
161
|
0 |
0 |
unless (exists $GBL->{'heritage'}{$pkg}) |
|
169
|
0 |
0 |
exists $$objects{$$self} ? : |
|
173
|
0 |
0 |
if (&Scalar::Util::blessed($arg)) { } |
|
175
|
0 |
0 |
unless (grep {$_ == $arg;} @objs) |
|
183
|
0 |
0 |
unless (grep {ref $_ eq $arg;} @objs) |
|
196
|
0 |
0 |
if (&Scalar::Util::blessed($arg)) { } |
|
197
|
0 |
0 |
if ($obj == $arg) |
|
201
|
0 |
0 |
if (ref $obj eq $arg) |
|
210
|
0 |
0 |
if (@new_list) { } |
|
223
|
0 |
7 |
if ($caller ne 'Object::InsideOut') |
|
230
|
0 |
7 |
if (exists $GBL->{'dump'}{'fld'}{$pkg}{'heritage'}) |
|
240
|
0 |
7 |
if (is_sharing($pkg)) |