| lib/Crypt/Perl/ECDSA/KeyBase.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 9 | 12 | 75.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 225 | 0 | 0 | 467 | $r->is_positive and $s->is_positive |
| 243 | 1 | 1 | 465 | $r->blt($n) and $s->blt($n) |
| 299 | 410 | 4 | 13 | $params{'seed'} and $curve_hr->{'seed'} |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 344 | 1580 | 309 | 0 | $self->{'_curve_obj'} ||= "Crypt::Perl::ECDSA::EC::Curve"->new(@{$self->_curve;}{"p", "a", "b"}) |