| line |
true |
false |
branch |
|
43
|
0 |
1 |
if (@_) |
|
46
|
0 |
0 |
if (@_ == 1 and ref $_[0] eq 'HASH') { } |
|
|
0 |
0 |
elsif (@_ == 1 and UNIVERSAL::isa($_[0], 'ICC::Profile')) { } |
|
83
|
0 |
0 |
if (@_) |
|
86
|
0 |
0 |
if (@_ == 1 and ref $_[0] eq 'HASH') { } |
|
114
|
0 |
0 |
if (@_) |
|
117
|
0 |
0 |
unless ref $_[0] eq 'ARRAY' |
|
138
|
0 |
0 |
if (@_) |
|
141
|
0 |
0 |
if (@_ == 1 and UNIVERSAL::isa($_[0], 'ICC::Profile::cvst')) { } |
|
172
|
0 |
0 |
if (@_) |
|
175
|
0 |
0 |
if (@_ == 1 and UNIVERSAL::isa($_[0], 'ICC::Profile::matf')) { } |
|
206
|
0 |
0 |
if (@_) |
|
209
|
0 |
0 |
if (@_ == 1 and UNIVERSAL::isa($_[0], 'ICC::Profile::cvst')) { } |
|
240
|
0 |
0 |
if (@_) |
|
243
|
0 |
0 |
if (@_ == 1 and UNIVERSAL::isa($_[0], 'ICC::Profile::clut')) { } |
|
274
|
0 |
0 |
if (@_) |
|
277
|
0 |
0 |
if (@_ == 1 and UNIVERSAL::isa($_[0], 'ICC::Profile::cvst')) { } |
|
309
|
0 |
0 |
if (@_) |
|
312
|
0 |
0 |
if (@_ == 1) { } |
|
341
|
0 |
0 |
if (@_) |
|
344
|
0 |
0 |
if (@_ == 1) { } |
|
380
|
0 |
1 |
unless @_ == 3 |
|
398
|
0 |
1 |
unless @_ == 4 |
|
430
|
3 |
0 |
if (defined $self->[1][1]) |
|
438
|
3 |
0 |
if (defined $self->[1][2]) |
|
454
|
3 |
0 |
if (defined $self->[1][3]) |
|
465
|
3 |
0 |
if (defined $self->[1][4]) |
|
522
|
0 |
0 |
ref $_[-1] eq 'HASH' ? : |
|
525
|
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($_);} @_)) { } |
|
534
|
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];})) { } |
|
540
|
0 |
0 |
if ref $_ eq 'ARRAY' |
|
588
|
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;}) |
|
597
|
0 |
0 |
defined $init->[$i] ? : |
|
664
|
0 |
0 |
if $error < $elim |
|
692
|
0 |
0 |
if (defined $self->[1][$i] and $self->[2] & 1 << $i) |
|
698
|
0 |
0 |
defined $jac ? : |
|
705
|
0 |
0 |
unless defined $jac |
|
708
|
0 |
0 |
if (wantarray) { } |
|
732
|
0 |
0 |
if (defined $pcs) { } |
|
735
|
0 |
0 |
if (grep {$pcs == $_;} 3, 8) { } |
|
753
|
0 |
0 |
if (defined $self->[0]{'pcs_encoding'}) { } |
|
778
|
0 |
0 |
if (defined $wtpt) { } |
|
781
|
0 |
0 |
if (@{$wtpt;} == 3 and 3 == grep({not ref $_;} @{$wtpt;})) { } |
|
799
|
0 |
0 |
if (defined $self->[0]{'wtpt'}) { } |
|
828
|
0 |
0 |
ref $p eq 'ARRAY' ? : |
|
|
0 |
0 |
defined $p ? : |
|
831
|
0 |
0 |
defined $p->[0] && !ref($p->[0]) ? : |
|
837
|
0 |
0 |
if ($fmt =~ /s/) |
|
849
|
0 |
0 |
if (not defined $element) { } |
|
|
0 |
0 |
elsif (not &Scalar::Util::blessed($element)) { } |
|
|
0 |
0 |
elsif ($element->can('sdump')) { } |
|
864
|
0 |
0 |
defined $$p[$i + 1] ? : |
|
901
|
0 |
0 |
if ref $_[-1] eq 'HASH' |
|
923
|
0 |
0 |
if (defined $self->[1][$i] and $self->[2] & 1 << $i) |
|
929
|
0 |
0 |
if $self->[3] & 1 << $i |
|
952
|
0 |
0 |
if (defined $self->[1][$i] and $self->[2] & 1 << $i) |
|
958
|
0 |
0 |
if $self->[3] & 1 << $i |
|
994
|
0 |
0 |
if (@{$in;} == grep({not ref $_;} @{$in;})) { } |
|
1005
|
0 |
0 |
if (ref $in->[$i] eq 'ARRAY') { } |
|
1038
|
0 |
1 |
unless $#{$$self[1];} <= 4 |
|
1044
|
5 |
0 |
if (defined $self->[1][$i]) |
|
1047
|
0 |
5 |
unless ref $self->[1][$i] eq $class[$i] |
|
1050
|
5 |
0 |
if ($self->[1][$i]->can('cin')) |
|
1053
|
1 |
4 |
unless (defined $ci) |
|
1061
|
4 |
1 |
if (defined $co) |
|
1064
|
0 |
4 |
unless $self->[1][$i]->cin == $co |
|
1071
|
5 |
0 |
if ($self->[1][$i]->can('cout')) |
|
1083
|
0 |
1 |
unless defined $self->[1][0] |
|
1086
|
0 |
1 |
if defined $self->[1][1] xor defined $self->[1][2] |
|
1089
|
0 |
1 |
if defined $self->[1][3] xor defined $self->[1][4] |
|
1092
|
1 |
0 |
if (defined $self->[1][1]) |
|
1095
|
0 |
1 |
unless $ci == 3 |
|
1098
|
0 |
1 |
unless $self->[1][1]->cin == 3 and $self->[1][1]->cout == 3 |
|
1101
|
0 |
1 |
unless not defined $self->[1][1][2] or @{$self->[1][1][2];} == 0 or @{$self->[1][1][2];} == 3 |
|
1122
|
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 ' |
|
1131
|
0 |
0 |
unless @XYZ == 3 and @TRC == 3 |
|
1146
|
0 |
0 |
if defined $wtpt |
|
1152
|
0 |
0 |
if defined $bkpt |
|
1191
|
0 |
0 |
if (defined $hash->{$attr}) |
|
1194
|
0 |
0 |
if (ref $hash->{$attr} eq $list{$attr}[0]) { } |
|
1244
|
0 |
1 |
unless $mft[0] eq 'mBA ' |
|
1247
|
0 |
1 |
unless $mft[1] > 0 and $mft[1] < 16 |
|
1250
|
0 |
1 |
unless $mft[2] > 0 and $mft[2] < 16 |
|
1253
|
1 |
0 |
if ($mft[3]) |
|
1274
|
0 |
3 |
if ($buf eq 'curv') { } |
|
|
3 |
0 |
elsif ($buf eq 'para') { } |
|
1308
|
1 |
0 |
if ($mft[4]) |
|
1331
|
1 |
0 |
if ($mft[5]) |
|
1352
|
0 |
3 |
if ($buf eq 'curv') { } |
|
|
3 |
0 |
elsif ($buf eq 'para') { } |
|
1386
|
1 |
0 |
if ($mft[6]) |
|
1433
|
1 |
0 |
if ($mft[7]) |
|
1454
|
0 |
3 |
if ($buf eq 'curv') { } |
|
|
3 |
0 |
elsif ($buf eq 'para') { } |
|
1512
|
1 |
0 |
if (defined $self->[1][0]) { } |
|
1533
|
1 |
0 |
if (defined $self->[1][1]) { } |
|
1536
|
0 |
1 |
unless $mft[2] == 3 |
|
1552
|
1 |
0 |
if (defined $self->[1][2]) { } |
|
1555
|
0 |
1 |
unless $mft[2] == 3 |
|
1579
|
1 |
0 |
if (defined $self->[1][3]) { } |
|
1601
|
1 |
0 |
if (defined $self->[1][4]) { } |
|
1634
|
1 |
0 |
if (defined $self->[1][1]) |
|
1645
|
1 |
0 |
if (defined $self->[1][2]) |
|
1664
|
1 |
0 |
if (defined $self->[1][3]) |
|
1689
|
1 |
0 |
if (defined $self->[1][4]) |