From: tb <tb@openbsd.org>
Date: Sun, 26 Mar 2023 08:04:57 +0000 (+0000)
Subject: bn_prime.pl: fix shebang and a couple more whitespace tweaks
X-Git-Url: http://artulab.com/gitweb/?a=commitdiff_plain;h=4aca1c33d9e2657da5e7e6b8eb32a535f3f8e283;p=openbsd

bn_prime.pl: fix shebang and a couple more whitespace tweaks
---

diff --git a/lib/libcrypto/bn/bn_prime.pl b/lib/libcrypto/bn/bn_prime.pl
index 0e982fc0af4..f638e4a9a4f 100644
--- a/lib/libcrypto/bn/bn_prime.pl
+++ b/lib/libcrypto/bn/bn_prime.pl
@@ -1,5 +1,5 @@
-#!/bin/perl
-# 	$OpenBSD: bn_prime.pl,v 1.11 2023/03/25 11:35:02 tb Exp $
+#!/usr/bin/perl
+# 	$OpenBSD: bn_prime.pl,v 1.12 2023/03/26 08:04:57 tb Exp $
 #
 # Copyright (C) 1995-1997 Eric Young (eay@cryptsoft.com)
 # All rights reserved.
@@ -72,13 +72,14 @@ push(@primes, 2);
 $p = 1;
 
 loop:
-while ($#primes < $num-1) {
+while ($#primes < $num - 1) {
 	$p += 2;
 	$s = int(sqrt($p));
 
 	for ($i = 0; defined($primes[$i]) && $primes[$i] <= $s; $i++) {
 		next loop if $p % $primes[$i] == 0;
 	}
+
 	die "\$primes[$i] is too large: $primes[$i]" if $primes[$i] > 65535;
 	push(@primes, $p);
 }