| line |
true |
false |
branch |
|
20
|
2 |
438 |
if (&Scalar::Util::refaddr($self) eq &Scalar::Util::refaddr($data)) |
|
23
|
0 |
438 |
if (&Scalar::Util::blessed($data) and not $data->isa("Venus::Kind")) |
|
26
|
186 |
252 |
if ($self->comparer('eq') eq 'numified') { } |
|
|
80 |
172 |
elsif ($self->comparer('eq') eq 'stringified') { } |
|
|
172 |
0 |
elsif (my $method = $self->comparer('eq')) { } |
|
27
|
106 |
80 |
$self->numified == $data->numified ? : |
|
30
|
19 |
61 |
$self->stringified eq $data->stringified ? : |
|
33
|
25 |
147 |
$self->$method eq $data->$method ? : |
|
43
|
102 |
85 |
if ($self->gt($data) or $self->eq($data)) { } |
|
54
|
21 |
73 |
if ($self->ge($ge) and $self->le($le)) { } |
|
67
|
1 |
387 |
if (&Scalar::Util::refaddr($self) eq &Scalar::Util::refaddr($data)) |
|
70
|
0 |
387 |
if (&Scalar::Util::blessed($data) and not $data->isa("Venus::Kind")) |
|
73
|
315 |
72 |
if ($self->comparer('gt') eq 'numified') { } |
|
|
72 |
0 |
elsif ($self->comparer('gt') eq 'stringified') { } |
|
|
0 |
0 |
elsif (my $method = $self->comparer('gt')) { } |
|
74
|
92 |
223 |
$self->numified > $data->numified ? : |
|
77
|
24 |
48 |
$self->stringified gt $data->stringified ? : |
|
80
|
0 |
0 |
$self->$method gt $data->$method ? : |
|
90
|
2 |
92 |
if ($self->gt($gt) and $self->lt($lt)) { } |
|
101
|
0 |
3 |
unless (ref $data) |
|
104
|
1 |
2 |
if (&Scalar::Util::refaddr($self) eq &Scalar::Util::refaddr($data)) { } |
|
117
|
0 |
268 |
if (&Scalar::Util::refaddr($self) eq &Scalar::Util::refaddr($data)) |
|
120
|
0 |
268 |
if (&Scalar::Util::blessed($data) and not $data->isa("Venus::Kind")) |
|
123
|
217 |
51 |
if ($self->comparer('lt') eq 'numified') { } |
|
|
51 |
0 |
elsif ($self->comparer('lt') eq 'stringified') { } |
|
|
0 |
0 |
elsif (my $method = $self->comparer('lt')) { } |
|
124
|
60 |
157 |
$self->numified < $data->numified ? : |
|
127
|
18 |
33 |
$self->stringified lt $data->stringified ? : |
|
130
|
0 |
0 |
$self->$method lt $data->$method ? : |
|
140
|
82 |
64 |
if ($self->lt($data) or $self->eq($data)) { } |
|
151
|
24 |
70 |
$self->eq($data) ? : |
|
157
|
0 |
4 |
unless (&Scalar::Util::blessed($data)) |
|
160
|
1 |
3 |
if (&Scalar::Util::refaddr($self) eq &Scalar::Util::refaddr($data)) |
|
163
|
1 |
2 |
if ($data->isa($self->class)) { } |
|
174
|
0 |
95 |
unless (&Scalar::Util::blessed($data)) |
|
177
|
1 |
94 |
if (&Scalar::Util::refaddr($self) eq &Scalar::Util::refaddr($data)) |
|
180
|
12 |
82 |
if ($data->isa($self->class)) { } |