| line |
true |
false |
branch |
|
22
|
1 |
2 |
if (not exists $self->{$can} and $self->{'X-Mock-Strict'}) |
|
33
|
7 |
48 |
if ($self->{'X-Mock-Called'}) |
|
38
|
41 |
14 |
if (exists $self->{$call}) { } |
|
|
2 |
12 |
elsif ($self->{'X-Mock-Strict'}) { } |
|
40
|
15 |
26 |
if ($ref eq 'HASH') { } |
|
|
4 |
22 |
elsif ($ref eq 'ARRAY') { } |
|
|
3 |
19 |
elsif ($ref eq 'CODE') { } |
|
|
2 |
17 |
elsif ($ref eq 'REF') { } |
|
47
|
2 |
1 |
if ($self->{'X-Mock-SelfArg'}) |
|
67
|
15 |
3 |
if (my $isas = $self->{'X-Mock-ISA'}) { } |
|
|
1 |
2 |
elsif (exists $self->{'X-Mock-ISA'}) { } |
|
69
|
3 |
12 |
if (not $ref and $isas eq $class) { } |
|
|
3 |
9 |
elsif ($ref eq 'ARRAY') { } |
|
|
4 |
5 |
elsif ($ref eq 'CODE') { } |
|
|
2 |
3 |
elsif ($ref eq 'Regexp') { } |
|
73
|
2 |
1 |
if &any(sub {
$_ eq $class;
}
, @$isas) |
|
76
|
2 |
2 |
if ($self->{'X-Mock-SelfArg'}) |
|
102
|
56 |
20 |
if (exists $orig->{$attr}) |
|
111
|
5 |
3 |
if (my $stringify = $self->{'X-Mock-Stringify'}) |
|
112
|
3 |
2 |
if (ref $stringify eq 'CODE') |
|
113
|
2 |
1 |
if ($self->{'X-Mock-SelfArg'}) |