| line |
true |
false |
branch |
|
85
|
2 |
45 |
unless UNIVERSAL::isa($caller, 'Class::Meta') or UNIVERSAL::isa($caller, 'Class::Meta::Class') |
|
93
|
1 |
44 |
$$spec{'abstract'} ? : |
|
96
|
0 |
5 |
ref $$spec{'trust'} ? : |
|
|
5 |
40 |
exists $$spec{'trust'} ? : |
|
165
|
1 |
5 |
wantarray ? : |
|
250
|
98 |
20 |
if (@_) { } |
|
|
8 |
12 |
elsif ($caller eq $$self{'package'}) { } |
|
|
0 |
12 |
elsif (UNIVERSAL::isa($caller, $$self{'package'})) { } |
|
|
7 |
5 |
elsif (_trusted($self, $caller)) { } |
|
255
|
0 |
8 |
unless $$self{"priv_${key}_ord"} |
|
258
|
0 |
0 |
unless $$self{"prot_${key}_ord"} |
|
261
|
0 |
7 |
unless $$self{"trst_${key}_ord"} |
|
264
|
0 |
5 |
unless $$self{"${key}_ord"} |
|
267
|
97 |
21 |
@$list == 1 ? : |
|
330
|
2 |
30 |
unless UNIVERSAL::isa($caller, 'Class::Meta') or UNIVERSAL::isa($caller, 'Class::Meta::Class') |
|
355
|
82 |
5 |
if $$classes{$super}{'trusted'} |
|
358
|
14 |
60 |
if @trusted |
|
365
|
88 |
67 |
if (my $things = $$class{$key . 's'}) |
|
368
|
64 |
24 |
if (my $ord = $$class{"${key}_ord"}) |
|
372
|
64 |
24 |
if (my $prot = $$class{"prot_${key}_ord"}) |
|
376
|
64 |
24 |
if (my $trust = $$class{"trst_${key}_ord"}) |
|
380
|
64 |
24 |
if (my $all = $$class{"all_${key}_ord"}) |
|
382
|
17 |
155 |
if $sall{$name}++ |
|
385
|
7 |
14 |
if $super eq $package or $view == 4 or $view == 2 or _trusted($class, $package) |
|
394
|
58 |
76 |
if @lookup |
|
395
|
58 |
76 |
if @ord |
|
396
|
58 |
76 |
if @all |
|
397
|
58 |
76 |
if @prot |
|
398
|
58 |
76 |
if @trst |
|
399
|
58 |
76 |
if @priv |
|
408
|
0 |
26 |
unless my $trusted = $$self{'trusted'} |
|
410
|
7 |
14 |
if UNIVERSAL::isa($caller, $pkg) |