lib/Crypt/Perl/BigInt.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 7 | 10 | 70.0 |
line | true | false | branch |
---|---|---|---|
22 | 17 | 0 | unless (eval { do { 'Crypt::Perl::BigInt'->fffrom_bytes('1234') } }) |
26 | 17 | 0 | unless (eval { do { 'Crypt::Perl::BigInt'->new(1234)->aaas_bytes } }) |
44 | 0 | 5090 | if $self < 0 |
49 | 2174 | 2916 | if (length($hex) % 2) { } |
71 | 534 | 409808 | if $bit_from_least >= length $bstr |