| lib/Crypt/Perl/ECDSA/EncodedPoint.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 9 | 12 | 75.0 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 33 | 107 | 94 | 524 | $first_octet == 6 or $first_octet == 7 |
| 99 | 105 | 0 | $first_octet == 2 or $first_octet == 3 | |
| 53 | 4 | 3 | 0 | $self->{'_compressed_bin'} ||= do { Crypt::Perl::ECDSA::Utils::compress_point($self->{'_bin'}) } |
| 64 | 947 | 112 | 0 | $self->{'_bin'} ||= do { die "Need compressed bin!" unless $self->{'_compressed_bin'}; Crypt::Perl::ECDSA::Utils::decompress_point($self->{'_compressed_bin'}, @{$curve_hr;}{"p", "a", "b"}) } |