@@ -954,11 +954,12 @@
     Tcl_Obj *objPtr = NULL;
     SSL_CTX *ctx = NULL;
     SSL *ssl = NULL;
     STACK_OF(SSL_CIPHER) *sk;
     char buf[BUFSIZ];
-    int index, verbose = 0, use_supported = 0;
+    Tcl_Size index;
+    int verbose = 0, use_supported = 0;
     const SSL_METHOD *method;
     (void) clientData;
 
     dprintf("Called");