| line |
true |
false |
branch |
|
53
|
0 |
29 |
if (defined $name) |
|
74
|
1 |
0 |
unless (exists $Classes{$class}) |
|
76
|
0 |
1 |
if $@ |
|
86
|
1 |
33 |
unless is_existing_package($class) |
|
93
|
0 |
26 |
if ref $args ne 'HASH' |
|
100
|
0 |
2 |
if ref $defaults and ref $defaults ne 'ARRAY' |
|
101
|
1 |
1 |
if ref $defaults ne 'ARRAY' |
|
109
|
0 |
43 |
unless $current_engine->has_rule($_) |
|
116
|
42 |
42 |
if blessed $_ |
|
119
|
0 |
42 |
if @_ > @when + @actions |
|
122
|
0 |
42 |
unless $current_engine->has_action($_) |
|
138
|
0 |
181 |
unless $current_engine |
|
140
|
227 |
0 |
if blessed $_ |
|
141
|
0 |
181 |
if @isa > 1 |
|
143
|
227 |
0 |
if blessed $_ |
|
144
|
0 |
181 |
if @args > 1 |
|
146
|
227 |
0 |
if blessed $_ |
|
147
|
0 |
181 |
if @defaults > 1 |
|
149
|
227 |
0 |
if blessed $_ |
|
150
|
0 |
181 |
if @does > 1 |
|
156
|
34 |
147 |
if (@isa) { } |
|
|
141 |
6 |
elsif (@does) { } |
|
|
6 |
0 |
elsif ($instance and blessed $instance and $instance->isa($base_class)) { } |
|
157
|
2 |
32 |
if @defaults |
|
158
|
26 |
8 |
@args ? : |
|
184
|
0 |
2 |
if ref $defaults ne 'HASH' |