From be6760be46b79c5ac75796dd36fa976cb7821ec4 Mon Sep 17 00:00:00 2001 From: "jan.nijtmans" Date: Mon, 19 Feb 2024 16:27:45 +0000 Subject: TCL_INTEGER_SPACE + 4 could be too small for a channelName on win32. Backported from 9.0: Derpfix... --- win/tclWinConsole.c | 2 +- win/tclWinSock.c | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/win/tclWinConsole.c b/win/tclWinConsole.c index facdb01..0bfa5a5 100644 --- a/win/tclWinConsole.c +++ b/win/tclWinConsole.c @@ -1335,7 +1335,7 @@ TclWinOpenConsoleChannel( * for instance). */ - snprintf(channelName, TCL_INTEGER_SPACE + 4, "file%" TCL_Z_MODIFIER "x", (size_t) infoPtr); + snprintf(channelName, 16 + TCL_INTEGER_SPACE, "file%" TCL_Z_MODIFIER "x", (size_t) infoPtr); infoPtr->channel = Tcl_CreateChannel(&consoleChannelType, channelName, infoPtr, permissions); diff --git a/win/tclWinSock.c b/win/tclWinSock.c index abe8321..df81c46 100644 --- a/win/tclWinSock.c +++ b/win/tclWinSock.c @@ -81,7 +81,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_CHAN_LENGTH (16 + TCL_INTEGER_SPACE) #define SOCK_TEMPLATE "sock%p" /* -- cgit v0.12