| line |
true |
false |
branch |
|
20
|
0 |
2892 |
unless $package_name and not ref $package_name |
|
30
|
30 |
1 |
if ref $package_name |
|
32
|
0 |
31 |
unless $package_name and not ref $package_name |
|
35
|
31 |
0 |
if (exists $METAS{$package_name}) |
|
44
|
2 |
223 |
unless defined $class_or_instance |
|
85
|
420 |
5054 |
$code && !exists($foreign{Mouse::Util::get_code_package($code)}) ? : |
|
94
|
1 |
5803 |
unless defined $method_name |
|
103
|
0 |
406 |
unless defined $method_name |
|
113
|
64 |
37 |
if (my $code = $self->get_method_body($method_name)) |
|
136
|
6 |
63 |
if (my $type = ref $arg) { } |
|
137
|
6 |
0 |
if ($type eq 'Regexp') { } |
|
|
0 |
0 |
elsif ($type eq 'ARRAY') { } |
|
169
|
0 |
184 |
if @_ < 2 |
|
172
|
91 |
93 |
if (exists $options{'superclasses'}) |
|
173
|
0 |
91 |
if (Mouse::Util::is_a_metarole($self)) { } |
|
178
|
1 |
90 |
unless ref $superclasses eq 'ARRAY' |
|
184
|
8 |
175 |
if (defined $attributes) |
|
185
|
1 |
7 |
unless ref $attributes eq 'ARRAY' or ref $attributes eq 'HASH' |
|
189
|
8 |
174 |
if (defined $methods) |
|
190
|
1 |
7 |
unless ref $methods eq 'HASH' |
|
194
|
90 |
91 |
if (defined $roles) |
|
195
|
1 |
89 |
unless ref $roles eq 'ARRAY' |
|
201
|
171 |
9 |
unless (defined $package_name) |
|
205
|
51 |
120 |
unless ($mortal) |
|
208
|
1 |
50 |
unless $superclasses |
|
209
|
3 |
48 |
unless $roles |
|
211
|
9 |
42 |
if exists $IMMORTALS{$cache_key} |
|
221
|
0 |
171 |
if exists $options{'version'} |
|
222
|
0 |
171 |
if exists $options{'authority'} |
|
227
|
120 |
51 |
if $mortal |
|
234
|
80 |
91 |
if defined $superclasses |
|
242
|
7 |
163 |
if (defined $attributes) |
|
243
|
5 |
2 |
if (ref $attributes eq 'ARRAY') { } |
|
256
|
7 |
163 |
if (defined $methods) |
|
261
|
56 |
114 |
if (defined $roles and not $options{'in_application_to_instance'}) |
|
265
|
42 |
127 |
if ($cache_key) |
|
275
|
0 |
109 |
if Mouse::Util::in_global_destruction() |
|
278
|
29 |
80 |
unless $serial_id |
|
281
|
0 |
80 |
if (exists $INC{'threads.pm'}) |
|
284
|
0 |
0 |
if (caller)[2] == 0 |
|
290
|
51 |
29 |
if exists $self->{'superclasses'} |