aboutsummaryrefslogtreecommitdiff
path: root/lang/tcl86/files/patch-generic_tclIO.c
diff options
context:
space:
mode:
Diffstat (limited to 'lang/tcl86/files/patch-generic_tclIO.c')
-rw-r--r--lang/tcl86/files/patch-generic_tclIO.c21
1 files changed, 21 insertions, 0 deletions
diff --git a/lang/tcl86/files/patch-generic_tclIO.c b/lang/tcl86/files/patch-generic_tclIO.c
new file mode 100644
index 000000000000..a64bf3945b26
--- /dev/null
+++ b/lang/tcl86/files/patch-generic_tclIO.c
@@ -0,0 +1,21 @@
+https://core.tcl-lang.org/tcl/info/24b9181478
+
+--- generic/tclIO.c.orig 2020-12-11 17:46:22 UTC
++++ generic/tclIO.c
+@@ -4277,6 +4277,7 @@ Write(
+ /* State info for channel */
+ char *nextNewLine = NULL;
+ int endEncoding, saved = 0, total = 0, flushed = 0, needNlFlush = 0;
++ char safe[BUFFER_PADDING];
+
+ if (srcLen) {
+ WillWrite(chanPtr);
+@@ -4295,7 +4296,7 @@ Write(
+
+ while (srcLen + saved + endEncoding > 0) {
+ ChannelBuffer *bufPtr;
+- char *dst, safe[BUFFER_PADDING];
++ char *dst;
+ int result, srcRead, dstLen, dstWrote, srcLimit = srcLen;
+
+ if (nextNewLine) {