| line |
true |
false |
branch |
|
40
|
0 |
1 |
if (@_) |
|
43
|
0 |
0 |
if (@_ == 1 and ref $_[0] eq 'HASH') { } |
|
|
0 |
0 |
elsif (@_ == 1 and UNIVERSAL::isa($_[0], 'ICC::Profile')) { } |
|
80
|
0 |
0 |
if (@_) |
|
83
|
0 |
0 |
if (@_ == 1 and ref $_[0] eq 'HASH') { } |
|
111
|
0 |
0 |
if (@_) |
|
114
|
0 |
0 |
unless ref $_[0] eq 'ARRAY' |
|
135
|
0 |
0 |
if (@_) |
|
138
|
0 |
0 |
if (@_ == 1 and UNIVERSAL::isa($_[0], 'ICC::Profile::cvst')) { } |
|
169
|
0 |
0 |
if (@_) |
|
172
|
0 |
0 |
if (@_ == 1 and UNIVERSAL::isa($_[0], 'ICC::Profile::matf')) { } |
|
203
|
0 |
0 |
if (@_) |
|
206
|
0 |
0 |
if (@_ == 1 and UNIVERSAL::isa($_[0], 'ICC::Profile::cvst')) { } |
|
237
|
0 |
0 |
if (@_) |
|
240
|
0 |
0 |
if (@_ == 1 and UNIVERSAL::isa($_[0], 'ICC::Profile::clut')) { } |
|
271
|
0 |
0 |
if (@_) |
|
274
|
0 |
0 |
if (@_ == 1 and UNIVERSAL::isa($_[0], 'ICC::Profile::cvst')) { } |
|
306
|
0 |
0 |
if (@_) |
|
309
|
0 |
0 |
if (@_ == 1) { } |
|
338
|
0 |
0 |
if (@_) |
|
341
|
0 |
0 |
if (@_ == 1) { } |
|
377
|
0 |
1 |
unless @_ == 3 |
|
395
|
0 |
1 |
unless @_ == 4 |
|
427
|
3 |
0 |
if (defined $self->[1][1]) |
|
435
|
3 |
0 |
if (defined $self->[1][2]) |
|
451
|
3 |
0 |
if (defined $self->[1][3]) |
|
462
|
3 |
0 |
if (defined $self->[1][4]) |
|
519
|
0 |
0 |
ref $_[-1] eq 'HASH' ? : |
|
522
|
0 |
0 |
if (@_ == $h + 2 and UNIVERSAL::isa($_[1], 'Math::Matrix')) { } |
|
|
0 |
0 |
elsif (@_ == $h + 2 and ref $_[1] eq 'ARRAY') { } |
|
|
0 |
0 |
elsif (@_ == $h + 1 + grep({&Scalar::Util::looks_like_number($_);} @_)) { } |
|
531
|
0 |
0 |
if (not ref $_[1][0] and @{$_[1];} == grep({&Scalar::Util::looks_like_number($_);} @{$_[1];})) { } |
|
|
0 |
0 |
elsif (ref $_[1][0] eq 'ARRAY' and @{$_[1];} == grep({&Scalar::Util::looks_like_number($_->[0]) if ref $_ eq 'ARRAY';} @{$_[1];})) { } |
|
537
|
0 |
0 |
if ref $_ eq 'ARRAY' |
|
585
|
0 |
0 |
if defined $_ |
|
|
0 |
0 |
if not defined $_ |
|
|
0 |
0 |
unless grep({++$i;
push @si, $i if defined $_;} @{$in;}) == grep({++$j;
push @so, $j if not defined $_;} @{$out;}) |
|
594
|
0 |
0 |
defined $init->[$i] ? : |
|
661
|
0 |
0 |
if $error < $elim |
|
689
|
0 |
0 |
if (defined $self->[1][$i] and $self->[2] & 1 << $i) |
|
695
|
0 |
0 |
defined $jac ? : |
|
702
|
0 |
0 |
unless defined $jac |
|
705
|
0 |
0 |
if (wantarray) { } |
|
729
|
0 |
0 |
if (defined $pcs) { } |
|
732
|
0 |
0 |
if (grep {$pcs == $_;} 3, 8) { } |
|
750
|
0 |
0 |
if (defined $self->[0]{'pcs_encoding'}) { } |
|
775
|
0 |
0 |
if (defined $wtpt) { } |
|
778
|
0 |
0 |
if (@{$wtpt;} == 3 and 3 == grep({not ref $_;} @{$wtpt;})) { } |
|
796
|
0 |
0 |
if (defined $self->[0]{'wtpt'}) { } |
|
825
|
0 |
0 |
ref $p eq 'ARRAY' ? : |
|
|
0 |
0 |
defined $p ? : |
|
828
|
0 |
0 |
defined $p->[0] && !ref($p->[0]) ? : |
|
834
|
0 |
0 |
if ($fmt =~ /s/) |
|
846
|
0 |
0 |
if (not defined $element) { } |
|
|
0 |
0 |
elsif (not &Scalar::Util::blessed($element)) { } |
|
|
0 |
0 |
elsif ($element->can('sdump')) { } |
|
861
|
0 |
0 |
defined $$p[$i + 1] ? : |
|
898
|
0 |
0 |
if ref $_[-1] eq 'HASH' |
|
920
|
0 |
0 |
if (defined $self->[1][$i] and $self->[2] & 1 << $i) |
|
926
|
0 |
0 |
if $self->[3] & 1 << $i |
|
949
|
0 |
0 |
if (defined $self->[1][$i] and $self->[2] & 1 << $i) |
|
955
|
0 |
0 |
if $self->[3] & 1 << $i |
|
991
|
0 |
0 |
if (@{$in;} == grep({not ref $_;} @{$in;})) { } |
|
1002
|
0 |
0 |
if (ref $in->[$i] eq 'ARRAY') { } |
|
1035
|
0 |
1 |
unless $#{$$self[1];} <= 4 |
|
1041
|
5 |
0 |
if (defined $self->[1][$i]) |
|
1044
|
0 |
5 |
unless ref $self->[1][$i] eq $class[$i] |
|
1047
|
5 |
0 |
if ($self->[1][$i]->can('cin')) |
|
1050
|
1 |
4 |
unless (defined $ci) |
|
1058
|
4 |
1 |
if (defined $co) |
|
1061
|
0 |
4 |
unless $self->[1][$i]->cin == $co |
|
1068
|
5 |
0 |
if ($self->[1][$i]->can('cout')) |
|
1080
|
0 |
1 |
unless defined $self->[1][0] |
|
1083
|
0 |
1 |
if defined $self->[1][1] xor defined $self->[1][2] |
|
1086
|
0 |
1 |
if defined $self->[1][3] xor defined $self->[1][4] |
|
1089
|
1 |
0 |
if (defined $self->[1][1]) |
|
1092
|
0 |
1 |
unless $co == 3 |
|
1095
|
0 |
1 |
unless $self->[1][1]->cin == 3 and $self->[1][1]->cout == 3 |
|
1098
|
0 |
1 |
unless not defined $self->[1][1][2] or @{$self->[1][1][2];} == 0 or @{$self->[1][1][2];} == 3 |
|
1119
|
0 |
0 |
unless UNIVERSAL::isa($disp, 'ICC::Profile') and $disp->profile_header->[3] eq 'mntr' and $disp->profile_header->[4] eq 'RGB ' and $disp->profile_header->[5] eq 'XYZ ' |
|
1128
|
0 |
0 |
unless @XYZ == 3 and @TRC == 3 |
|
1143
|
0 |
0 |
if defined $wtpt |
|
1149
|
0 |
0 |
if defined $bkpt |
|
1188
|
0 |
0 |
if (defined $hash->{$attr}) |
|
1191
|
0 |
0 |
if (ref $hash->{$attr} eq $list{$attr}[0]) { } |
|
1241
|
0 |
1 |
unless $mft[0] eq 'mAB ' |
|
1244
|
0 |
1 |
unless $mft[1] > 0 and $mft[1] < 16 |
|
1247
|
0 |
1 |
unless $mft[2] > 0 and $mft[2] < 16 |
|
1250
|
1 |
0 |
if ($mft[3]) |
|
1271
|
0 |
3 |
if ($buf eq 'curv') { } |
|
|
3 |
0 |
elsif ($buf eq 'para') { } |
|
1305
|
1 |
0 |
if ($mft[4]) |
|
1328
|
1 |
0 |
if ($mft[5]) |
|
1349
|
0 |
3 |
if ($buf eq 'curv') { } |
|
|
3 |
0 |
elsif ($buf eq 'para') { } |
|
1383
|
1 |
0 |
if ($mft[6]) |
|
1430
|
1 |
0 |
if ($mft[7]) |
|
1451
|
3 |
0 |
if ($buf eq 'curv') { } |
|
|
0 |
0 |
elsif ($buf eq 'para') { } |
|
1509
|
1 |
0 |
if (defined $self->[1][0]) { } |
|
1530
|
1 |
0 |
if (defined $self->[1][1]) { } |
|
1533
|
0 |
1 |
unless $mft[2] == 3 |
|
1549
|
1 |
0 |
if (defined $self->[1][2]) { } |
|
1552
|
0 |
1 |
unless $mft[2] == 3 |
|
1576
|
1 |
0 |
if (defined $self->[1][3]) { } |
|
1598
|
1 |
0 |
if (defined $self->[1][4]) { } |
|
1631
|
1 |
0 |
if (defined $self->[1][1]) |
|
1642
|
1 |
0 |
if (defined $self->[1][2]) |
|
1661
|
1 |
0 |
if (defined $self->[1][3]) |
|
1686
|
1 |
0 |
if (defined $self->[1][4]) |