| line |
true |
false |
branch |
|
138
|
3 |
39 |
if ($from_notest) { } |
|
146
|
0 |
42 |
if (@_ != @sans_preload) |
|
200
|
6 |
8 |
if (@_ == 1) { } |
|
216
|
118 |
102 |
unless ($Test->ok($ok, $name)) |
|
277
|
0 |
118 |
unless $stack |
|
286
|
118 |
0 |
if (&Scalar::Util::blessed($exp)) |
|
288
|
33 |
85 |
if ($exp->can('diagnostics')) { } |
|
295
|
27 |
58 |
if ($exp->can("diag_message")) |
|
302
|
85 |
33 |
unless (defined $diag) |
|
323
|
234 |
14 |
if (defined $val) { } |
|
325
|
4 |
11 |
&Scalar::Util::refaddr($val) eq $DNE_ADDR ? : |
|
|
15 |
219 |
ref $val ? : |
|
344
|
621 |
698 |
unless (ref $d1 or ref $d2) |
|
347
|
614 |
7 |
if (defined $d1) { } |
|
349
|
271 |
343 |
if defined $d2 and $d1 eq $d2 |
|
353
|
4 |
3 |
unless defined $d2 |
|
357
|
1 |
1886 |
if (not $Expects and &Scalar::Util::blessed($d1) and $d1->isa("Test::Deep::Cmp")) |
|
363
|
1188 |
1086 |
if (ref $d1 and ref $d2) |
|
368
|
18 |
84 |
if ($Expects and &Scalar::Util::blessed($d1) and $d1->isa("Test::Deep::Cmp")) |
|
371
|
3 |
15 |
unless blessed(&Scalar::Util::blessed($d2))->descend($d1) |
|
372
|
14 |
1 |
if ($d1->can("compare")) |
|
381
|
3 |
1168 |
if ($s1 eq $s2) |
|
385
|
34 |
1134 |
if ($CompareCache->cmp($d1, $d2)) { } |
|
403
|
5 |
2215 |
if (ref $d1 and &Scalar::Util::refaddr($d1) == $DNE_ADDR) |
|
410
|
1287 |
926 |
if ($d2->descend($d1)) { } |
|
429
|
1609 |
627 |
if defined $class and $data->isa("Test::Deep::Cmp") |
|
431
|
0 |
627 |
if (defined $class and $data->can("as_test_deep_cmp")) |
|
433
|
0 |
0 |
if $cmp->isa("Test::Deep::Cmp") |
|
441
|
397 |
230 |
if ($reftype eq '') { } |
|
443
|
5 |
392 |
$LeafWrapper ? : |
|
451
|
40 |
190 |
if $WrapCache{$addr} |
|
453
|
139 |
51 |
if ($reftype eq 'ARRAY') { } |
|
|
28 |
23 |
elsif ($reftype eq 'HASH') { } |
|
|
21 |
2 |
elsif ($reftype eq 'SCALAR' or $reftype eq 'REF') { } |
|
|
2 |
0 |
elsif ($reftype eq 'Regexp' or $reftype eq 'REGEXP') { } |
|
471
|
0 |
0 |
$LeafWrapper ? : |
|
486
|
397 |
233 |
unless defined $reftype |
|
488
|
233 |
0 |
unless $Test::Deep::RegexpVersion::OldStyle |
|
491
|
0 |
0 |
unless defined $blessed |
|
493
|
0 |
0 |
if ($blessed and $blessed eq "Regexp" and $reftype eq "SCALAR") |
|
595
|
1 |
4 |
unless $ref eq "ARRAY" |
|
630
|
34 |
0 |
if (@_) |