summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2016-04-08 13:30:12 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2016-04-08 13:30:12 (GMT)
commit9a27611f89f0e7b8a3a75faa7d1682a20aeb4d41 (patch)
treeb1560972b41713eaddad43147616cc6bb81d3bfb
parent7210b03f817e29c5ea8646216a5f9fbd20332ecf (diff)
parentac974ca777cdd74ddb37ea0569bd20a07a33fd42 (diff)
downloadtcl-9a27611f89f0e7b8a3a75faa7d1682a20aeb4d41.zip
tcl-9a27611f89f0e7b8a3a75faa7d1682a20aeb4d41.tar.gz
tcl-9a27611f89f0e7b8a3a75faa7d1682a20aeb4d41.tar.bz2
Fix [2538f373ffc78d6dba9c3d973c147a84fdd9bbd8|2538f373ffc78d6d]: crash in Tcl_OpenTcpServer() on Windows
-rw-r--r--win/tclWinSock.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/win/tclWinSock.c b/win/tclWinSock.c
index c71aa96..cc77afe 100644
--- a/win/tclWinSock.c
+++ b/win/tclWinSock.c
@@ -2052,7 +2052,6 @@ Tcl_OpenTcpServer(
char channelName[SOCK_CHAN_LENGTH];
u_long flag = 1; /* Indicates nonblocking mode. */
const char *errorMsg = NULL;
- ThreadSpecificData *tsdPtr = TclThreadDataKeyGet(&dataKey);
if (TclpHasSockets(interp) != TCL_OK) {
return NULL;
@@ -2168,6 +2167,7 @@ error:
}
if (statePtr != NULL) {
+ ThreadSpecificData *tsdPtr = TclThreadDataKeyGet(&dataKey);
statePtr->acceptProc = acceptProc;
statePtr->acceptProcData = acceptProcData;