Index: tls.c
==================================================================
--- tls.c
+++ tls.c
@@ -63,11 +63,11 @@
 
 static SSL_CTX *CTX_Init _ANSI_ARGS_((State *statePtr, int proto, char *key,
 			char *cert, char *CAdir, char *CAfile, char *ciphers,
 			char *DHparams));
 
-static int	TlsLibInit _ANSI_ARGS_ (()) ;
+static int	TlsLibInit _ANSI_ARGS_ ((void)) ;
 
 #define TLS_PROTO_SSL2		0x01
 #define TLS_PROTO_SSL3		0x02
 #define TLS_PROTO_TLS1		0x04
 #define TLS_PROTO_TLS1_1	0x08
@@ -123,11 +123,10 @@
  * Based from /crypto/cryptlib.c of OpenSSL and NSOpenSSL.
  */
 
 static Tcl_Mutex locks[CRYPTO_NUM_LOCKS];
 static Tcl_Mutex init_mx;
-static int initialized;
 
 static void          CryptoThreadLockCallback (int mode, int n, const char *file, int line);
 static unsigned long CryptoThreadIdCallback   (void);
 
 static void
@@ -1728,13 +1727,12 @@
  *	Result:
  *		none
  *
  *------------------------------------------------------*
  */
-static int
-TlsLibInit ()
-{
+static int TlsLibInit (void) {
+    static int initialized = 0;
     int i;
     char rnd_seed[16] = "GrzSlplKqUdnnzP!";	/* 16 bytes */
     int status=TCL_OK;
 #if defined(OPENSSL_THREADS) && defined(TCL_THREADS)
     size_t num_locks;