diff --git a/ssl/tls_srp.c b/ssl/tls_srp.c
index 91b88cd11f6ee3d413de743df8d423dd54a5e82c..64a3f23df74b029940e026106111b4ffb8299bfc 100644
--- a/ssl/tls_srp.c
+++ b/ssl/tls_srp.c
@@ -393,7 +393,8 @@ int srp_generate_client_master_secret(SSL *s)
  err:
     BN_clear_free(K);
     BN_clear_free(x);
-    OPENSSL_clear_free(passwd, strlen(passwd));
+    if (passwd != NULL)
+        OPENSSL_clear_free(passwd, strlen(passwd));
     BN_clear_free(u);
     return ret;
 }