diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2024-02-16 16:23:28 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2024-02-16 16:23:28 (GMT) |
| commit | 97a62e80f79407860fc7bb5ba1d73c435d607a2b (patch) | |
| tree | 0212c1d5b138ddddd3cac0107ed59400221b42b5 /win/tclWinSock.c | |
| parent | 7940db9a412b1e4f7a788c273d9bc17968266c5c (diff) | |
| download | tcl-97a62e80f79407860fc7bb5ba1d73c435d607a2b.zip tcl-97a62e80f79407860fc7bb5ba1d73c435d607a2b.tar.gz tcl-97a62e80f79407860fc7bb5ba1d73c435d607a2b.tar.bz2 | |
Derpfix...
Diffstat (limited to 'win/tclWinSock.c')
| -rw-r--r-- | win/tclWinSock.c | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/win/tclWinSock.c b/win/tclWinSock.c index 3fab851..d600f1f 100644 --- a/win/tclWinSock.c +++ b/win/tclWinSock.c @@ -65,8 +65,7 @@ #define GOT_BITS(var, bits) (((var) & (bits)) != 0) /* "sock" + a pointer in hex + \0 */ -#define SOCK_CHAN_LENGTH (4 + sizeof(void *) * 2 + 1) -#define SOCK_TEMPLATE "sock%p" +#define SOCK_CHAN_LENGTH (16 + TCL_INTEGER_SPACE) /* * The following variable is used to tell whether this module has been @@ -2337,7 +2336,7 @@ TcpAccept( newInfoPtr->selectEvents = (FD_READ | FD_WRITE | FD_CLOSE); SendSelectMessage(tsdPtr, SELECT, newInfoPtr); - TclWinGenerateChannelName(channelName, "sock", statePtr); + TclWinGenerateChannelName(channelName, "sock", newInfoPtr); newInfoPtr->channel = Tcl_CreateChannel(&tcpChannelType, channelName, newInfoPtr, (TCL_READABLE | TCL_WRITABLE)); if (Tcl_SetChannelOption(NULL, newInfoPtr->channel, "-translation", |