Tcl Source Code

Artifact [19ef164660]
Login

Artifact 19ef164660eb1b3f0c625b6c78c8f5c60ef8ce96:

Attachment "tclWinSock.c.diff" to ticket [1353853fff] added by matt-newman 2005-11-11 18:20:49.
Index: win/tclWinSock.c
===================================================================
RCS file: /cvs/kit/tcl/win/tclWinSock.c,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -d -b -w -r1.1 -r1.2
--- win/tclWinSock.c	2005/01/27 22:53:40	1.1
+++ win/tclWinSock.c	2005/11/07 15:25:32	1.2
@@ -1088,7 +1088,7 @@
 				 * in progress. */
     SOCKADDR_IN sockaddr;	/* Socket address */
     SOCKADDR_IN mysockaddr;	/* Socket address for client */
-    SOCKET sock;
+    SOCKET sock = INVALID_SOCKET;
     SocketInfo *infoPtr;	/* The returned value. */
     ThreadSpecificData *tsdPtr = 
 	(ThreadSpecificData *)TclThreadDataKeyGet(&dataKey);