From: Richard Levitte <levitte@openssl.org>
Date: Thu, 16 Nov 2000 22:41:26 +0000 (+0000)
Subject: Oops, when I clean, I should do it thoroughly.
X-Git-Tag: OpenSSL_0_9_6a-beta1~107^2~176
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=afb83c45e6745c92b45b6f894e3543bf5724d62e;p=openssl

Oops, when I clean, I should do it thoroughly.
---

diff --git a/crypto/bn/bn_sqr.c b/crypto/bn/bn_sqr.c
index bbff1ad72a..eb52c4e828 100644
--- a/crypto/bn/bn_sqr.c
+++ b/crypto/bn/bn_sqr.c
@@ -66,7 +66,7 @@ int BN_sqr(BIGNUM *r, const BIGNUM *a, BN_CTX *ctx)
 	{
 	int max,al;
 	int ret = 0;
-	BIGNUM *tmp,*rr,*free_a = NULL;
+	BIGNUM *tmp,*rr;
 
 #ifdef BN_COUNT
 	fprintf(stderr,"BN_sqr %d * %d\n",a->top,a->top);
@@ -144,7 +144,6 @@ int BN_sqr(BIGNUM *r, const BIGNUM *a, BN_CTX *ctx)
 	if (rr != r) BN_copy(r,rr);
 	ret = 1;
  err:
-	if (free_a) BN_free(free_a);
 	BN_CTX_end(ctx);
 	return(ret);
 	}