diff options
Diffstat (limited to '')
| -rw-r--r-- | src/lib/libcrypto/bn/bn_prime.pl | 7 | 
1 files changed, 6 insertions, 1 deletions
diff --git a/src/lib/libcrypto/bn/bn_prime.pl b/src/lib/libcrypto/bn/bn_prime.pl index 273e958079..0e982fc0af 100644 --- a/src/lib/libcrypto/bn/bn_prime.pl +++ b/src/lib/libcrypto/bn/bn_prime.pl  | |||
| @@ -1,5 +1,5 @@ | |||
| 1 | #!/bin/perl | 1 | #!/bin/perl | 
| 2 | # $OpenBSD: bn_prime.pl,v 1.10 2023/03/25 11:28:55 tb Exp $ | 2 | # $OpenBSD: bn_prime.pl,v 1.11 2023/03/25 11:35:02 tb Exp $ | 
| 3 | # | 3 | # | 
| 4 | # Copyright (C) 1995-1997 Eric Young (eay@cryptsoft.com) | 4 | # Copyright (C) 1995-1997 Eric Young (eay@cryptsoft.com) | 
| 5 | # All rights reserved. | 5 | # All rights reserved. | 
| @@ -57,6 +57,11 @@ | |||
| 57 | # copied and put under another distribution licence | 57 | # copied and put under another distribution licence | 
| 58 | # [including the GNU Public Licence.] | 58 | # [including the GNU Public Licence.] | 
| 59 | 59 | ||
| 60 | use strict; | ||
| 61 | use warnings; | ||
| 62 | |||
| 63 | my ($i, $num, $p, $s, @primes); | ||
| 64 | |||
| 60 | $num = 2048; | 65 | $num = 2048; | 
| 61 | $num = $ARGV[0] if $#ARGV >= 0; | 66 | $num = $ARGV[0] if $#ARGV >= 0; | 
| 62 | 67 | ||
