line |
true |
false |
branch |
109
|
2074 |
218 |
if ($self->has_max_args and $self->max_args == 0) { }
|
|
0 |
218 |
elsif ($self->min_args == 0 and $self->max_args == 1) { }
|
|
0 |
218 |
elsif ($self->min_args == 1 and $self->max_args == 1) { }
|
|
0 |
218 |
elsif ($self->min_args > 0 and $self->max_args > 0) { }
|
|
0 |
218 |
elsif ($self->max_args > 0) { }
|
129
|
0 |
1403 |
if ($self->has_max_args and @curried > $self->max_args)
|
139
|
1189 |
214 |
$self->has_max_args ? :
|
|
1318 |
85 |
$self->has_min_args ? :
|
|
1189 |
214 |
$self->signature ? :
|
157
|
826 |
555 |
if ref $av
|
164
|
170 |
385 |
if ($ti and $ti->{'trust_mutated'} eq "always")
|
167
|
150 |
235 |
if ($ti and $ti->{'trust_mutated'} eq "maybe")
|
171
|
555 |
0 |
if $av eq "no incoming values"
|
178
|
5641 |
2847 |
ref $_ eq 'ARRAY' ? :
|
185
|
1 |
4243 |
if (ref $method_name eq 'CODE') { }
|
192
|
20 |
4223 |
if ($method_name =~ /\s*\.\.\.$/)
|
196
|
0 |
4243 |
if ($method_name =~ /^\~\s*/)
|
200
|
3 |
4240 |
if ($method_name =~ /^(.+?)\s*\-\>\s*(.+?)$/)
|
206
|
4243 |
1 |
unless ($handler)
|
208
|
0 |
4243 |
$trait =~ /:/ ? :
|
211
|
4243 |
0 |
if ($class ne $trait)
|
213
|
0 |
4243 |
unless eval "require $class; 1"
|
216
|
4242 |
1 |
if ($class->isa("Sub::HandlesVia::HandlerLibrary") and $class->has_handler($method_name))
|
222
|
1 |
4243 |
unless ($handler)
|
226
|
1397 |
2847 |
if @curry
|
227
|
0 |
4244 |
if $make_loose
|
228
|
20 |
4224 |
if $make_chainable
|
235
|
0 |
4244 |
unless my $gen = $arg{'code_generator'}
|
244
|
0 |
0 |
unless my $gen = $arg{'code_generator'}
|
248
|
0 |
0 |
if ($arg{'method_name'})
|
251
|
0 |
0 |
if (eval {
|
268
|
0 |
4399 |
@_ % 2 ? :
|
312
|
0 |
2 |
unless $_[1]{'delegated_coderef'}
|