| line |
true |
false |
branch |
|
71
|
0 |
207 |
unless (defined $color) |
|
76
|
0 |
207 |
unless ($color->can("rgba")) |
|
83
|
0 |
207 |
unless ($builder->ok($cr == $red && $cg == $green && $cb == $blue, $comment)) |
|
101
|
0 |
0 |
unless (defined $color) |
|
106
|
0 |
0 |
unless ($color->can("rgba")) |
|
113
|
0 |
0 |
unless ($builder->ok(abs $cr - $red <= $tolerance && abs $cg - $green <= $tolerance && abs $cb - $blue <= $tolerance, $comment)) |
|
133
|
0 |
116 |
unless (defined $color) |
|
138
|
0 |
116 |
unless ($color->can("rgba")) |
|
145
|
0 |
116 |
unless ($builder->ok($cr == $red && $cg == $green && $cb == $blue && $ca == $alpha, $comment)) |
|
163
|
2 |
66 |
if (defined $comment_or_undef) { } |
|
172
|
0 |
68 |
unless (defined $color) |
|
177
|
0 |
68 |
unless ($color->can("rgba")) |
|
184
|
0 |
68 |
unless ($builder->ok(abs $cr - $red <= $mindiff && abs $cg - $green <= $mindiff && abs $cb - $blue <= $mindiff && abs $ca - $alpha <= $mindiff, $comment)) |
|
204
|
1 |
0 |
if (defined $comment_or_undef) { } |
|
213
|
0 |
1 |
unless (defined $color) |
|
218
|
0 |
1 |
unless ($color->can("rgba")) |
|
225
|
0 |
1 |
unless ($builder->ok(abs $cgrey - $grey <= $mindiff, $comment)) |
|
239
|
9 |
16 |
if (defined $comment_or_undef) { } |
|
248
|
0 |
25 |
unless (defined $color) |
|
253
|
0 |
25 |
unless ($color->can("rgba")) |
|
260
|
0 |
25 |
unless ($builder->ok(abs $cr - $red <= $mindiff && abs $cg - $green <= $mindiff && abs $cb - $blue <= $mindiff, $comment)) |
|
280
|
0 |
1 |
unless (defined $color) |
|
285
|
0 |
1 |
unless ($color->can("rgba")) |
|
292
|
0 |
1 |
unless ($builder->ok($cgrey == $grey, $comment)) |
|
408
|
0 |
11 |
unless my $name = shift() |
|
410
|
0 |
11 |
unless my $sub = $name_to_sub{$name} |
|
421
|
0 |
251 |
unless (defined $left) |
|
426
|
0 |
251 |
unless (defined $right) |
|
431
|
0 |
251 |
unless ($left->{'IMG'}) |
|
436
|
0 |
251 |
unless ($right->{'IMG'}) |
|
441
|
0 |
251 |
unless ($left->getwidth == $right->getwidth) |
|
447
|
0 |
251 |
unless ($left->getheight == $right->getheight) |
|
453
|
0 |
251 |
unless ($left->getchannels == $right->getchannels) |
|
469
|
0 |
222 |
unless _low_image_diff_check($left, $right, $comment) |
|
476
|
0 |
222 |
if ($diff > $limit) |
|
480
|
0 |
0 |
if ($limit == 0) |
|
487
|
0 |
0 |
if (join($", @lsamples) ne join($", @rsamples)) |
|
511
|
0 |
29 |
if (@_ > 3) |
|
520
|
0 |
29 |
unless _low_image_diff_check($left, $right, $comment) |
|
527
|
0 |
29 |
unless ($same) |
|
537
|
0 |
0 |
if (join($", @lsamples) ne join($", @rsamples)) |
|
599
|
4 |
17 |
unless defined $comment |
|
602
|
0 |
21 |
unless ($c) |
|
606
|
0 |
21 |
unless ($builder->ok(colorf_cmp($c, $expected, $epsilon) == 0, "$comment - got right color ($x, $y)")) |
|
623
|
0 |
12 |
unless defined $comment |
|
625
|
0 |
12 |
unless ($c) |
|
629
|
0 |
12 |
unless ($builder->ok(color_cmp($c, $expected) == 0, "got right color ($x, $y)")) |
|
649
|
0 |
6 |
unless @got == @$pels |
|
659
|
4 |
617 |
unless defined $epsilon |
|
689
|
1 |
2 |
unless defined $epsilon |
|
755
|
0 |
0 |
unless my $font = $opts->{'font'} |
|
766
|
0 |
0 |
unless $] >= "5.006" |
|
768
|
0 |
0 |
unless $] >= "5.008" |
|
793
|
0 |
0 |
if ($opts->{'files'}) |
|
819
|
0 |
0 |
if ($opts->{'files'}) |
|
827
|
0 |
0 |
unless $font->can("has_chars") |
|
843
|
0 |
0 |
unless $font->can_glyph_names |
|
874
|
0 |
0 |
unless $font->can_glyph_names |
|
884
|
0 |
0 |
unless $font->can("has_chars") |