X-Git-Url: https://git.openssl.org/?p=openssl.git;a=blobdiff_plain;f=crypto%2Fx509%2Fx509type.c;h=5274ded737dac6cee86f1f741364f8a85d7f669a;hp=05d6919d6ae16371d8125017b10e34a1c6aa0c58;hb=cfcf645356b0957e9ec7190e3afb3e4d6c406d5b;hpb=eda1f21f1af8b6f77327e7b37573af9c1ba73726

diff --git a/crypto/x509/x509type.c b/crypto/x509/x509type.c
index 05d6919d6a..5274ded737 100644
--- a/crypto/x509/x509type.c
+++ b/crypto/x509/x509type.c
@@ -1,5 +1,5 @@
 /* crypto/x509/x509type.c */
-/* Copyright (C) 1995-1997 Eric Young (eay@cryptsoft.com)
+/* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
  * All rights reserved.
  *
  * This package is an SSL implementation written
@@ -108,8 +108,9 @@ EVP_PKEY *pkey;
 		break;
 		}
 
-	if (EVP_PKEY_size(pkey) <= 512)
+	if (EVP_PKEY_size(pk) <= 512)
 		ret|=EVP_PKT_EXP;
+	if(pkey==NULL) EVP_PKEY_free(pk);
 	return(ret);
 	}