Branch Coverage

blib/lib/Kavorka/Multi.pm
Criterion Covered Total %
branch 70 90 77.7


line true false branch
41 13 0 if ($^H{'Kavorka'} =~ /\b$keyword=(\S+)/u) { }
106 0 22 unless $_[0]->multi_type->invocation_style
118 3 11 if ($DISPATCH_STYLE{$pkg}{$subname} eq 'fun')
125 6 20 unless $DISPATCH_TABLE{$_}{$subname}
135 1 6 unless $c->signature->check(@copy)
151 5 3 if ($DISPATCH_STYLE{$pkg}{$subname} ne 'fun')
167 0 0 $sig ? :
17 0 $sig && $sig->nobble_checks ? :
182 1 1 if @_ != 1
6 9 $#_ >= 0 ? :
9 0 ref $z eq 'SCALAR' || ref $z eq 'REF' ? :
1 8 if ($#_ >= 0)
9 0 if (do { local(@_) = @tmp; eval { do { Carp::croak('Expected 1 parameter') if @_ != 1; my $z = $#_ >= 0 ? $_[0] : Carp::croak('Positional parameter 0 is required'); if ($#_ >= 0) { do { BEGIN {${^WARNING_BITS} = "\x54\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x51\x55\x55\x55\x55\x55\x15"} ref $z eq 'SCALAR' || ref $z eq 'REF' ? $z : Type::Tiny::_failed_check(21, 'ScalarRef', $z) }; } ; (); 1 } } })
3 6 if ((ref $_[0] || $_[0]) ne 'Example')
6 2 @_ ? :
4 4 if @_ != 1
5 1 $#_ >= 0 ? :
2 4 ref $x eq 'HASH' ? :
5 1 if ($#_ >= 0)
2 3 if (do { local(@_) = @tmp; eval { do { my $self = @_ ? shift @_ : Carp::croak('Invocant $self is required'); Carp::croak('Expected 1 parameter') if @_ != 1; my $x = $#_ >= 0 ? $_[0] : Carp::croak('Positional parameter 0 is required'); if ($#_ >= 0) { do { BEGIN {${^WARNING_BITS} = "\x54\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x51\x55\x55\x55\x55\x55\x15"} ref $x eq 'HASH' ? $x : Type::Tiny::_failed_check(20, 'HashRef', $x) }; } ; (); 1 } } })
5 0 @_ ? :
3 2 if @_ != 1
2 3 $#_ >= 0 ? :
4 1 ref $y eq 'ARRAY' ? :
1 3 if ($#_ >= 0)
4 0 if (do { local(@_) = @tmp; eval { do { my $self = @_ ? shift @_ : Carp::croak('Invocant $self is required'); Carp::croak('Expected 1 parameter') if @_ != 1; my $y = $#_ >= 0 ? $_[0] : Carp::croak('Positional parameter 0 is required'); if ($#_ >= 0) { do { BEGIN {${^WARNING_BITS} = "\x54\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x51\x55\x55\x55\x55\x55\x15"} ref $y eq 'ARRAY' ? $y : Type::Tiny::_failed_check(19, 'ArrayRef', $y) }; } ; (); 1 } } })
2 2 if ((ref $_[0] || $_[0]) ne 'Example2')
4 0 @_ ? :
1 2 if @_ != 1
2 0 $#_ >= 0 ? :
0 2 ref $z eq 'SCALAR' || ref $z eq 'REF' ? :
2 0 if ($#_ >= 0)
1 1 if (do { local(@_) = @tmp; eval { do { my $self = @_ ? shift @_ : Carp::croak('Invocant $self is required'); Carp::croak('Expected 1 parameter') if @_ != 1; my $z = $#_ >= 0 ? $_[0] : Carp::croak('Positional parameter 0 is required'); if ($#_ >= 0) { do { BEGIN {${^WARNING_BITS} = "\x54\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x51\x55\x55\x55\x55\x55\x15"} ref $z eq 'SCALAR' || ref $z eq 'REF' ? $z : Type::Tiny::_failed_check(21, 'ScalarRef', $z) }; } ; (); 1 } } })
2 0 @_ ? :
1 1 if @_ != 1
1 0 $#_ >= 0 ? :
0 1 ref $x eq 'HASH' ? :
1 0 if ($#_ >= 0)
1 0 if (do { local(@_) = @tmp; eval { do { my $self = @_ ? shift @_ : Carp::croak('Invocant $self is required'); Carp::croak('Expected 1 parameter') if @_ != 1; my $x = $#_ >= 0 ? $_[0] : Carp::croak('Positional parameter 0 is required'); if ($#_ >= 0) { do { BEGIN {${^WARNING_BITS} = "\x54\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x51\x55\x55\x55\x55\x55\x15"} ref $x eq 'HASH' ? $x : Type::Tiny::_failed_check(20, 'HashRef', $x) }; } ; (); 1 } } })
1 0 @_ ? :
1 0 if @_ != 1
206 9 6 unless ($DISPATCH_TABLE{$pkg}{$subname})
212 2 13 unless $DISPATCH_STYLE{$pkg}{$subname} eq $self->invocation_style
224 13 2 unless delete $INVALIDATION{"${pkg}::$subname"}
228 3 12 if (defined $long)