View | Details | Raw Unified | Return to bug 258392
Collapse All | Expand All

(-)b/lang/tcl85/files/patch-generic_tclIO.c (+21 lines)
Added Link Here
1
https://core.tcl-lang.org/tcl/info/24b9181478
2
3
--- ../generic/tclIO.c.orig	2020-12-11 17:46:22 UTC
4
+++ ../generic/tclIO.c
5
@@ -3765,6 +3765,7 @@ Write(
6
 				/* State info for channel */
7
     char *nextNewLine = NULL;
8
     int endEncoding, saved = 0, total = 0, flushed = 0, needNlFlush = 0;
9
+    char safe[BUFFER_PADDING];
10
 
11
     if (srcLen) {
12
         WillWrite(chanPtr);
13
@@ -3783,7 +3784,7 @@ Write(
14
 
15
     while (srcLen + saved + endEncoding > 0) {
16
 	ChannelBuffer *bufPtr;
17
-	char *dst, safe[BUFFER_PADDING];
18
+	char *dst;
19
 	int result, srcRead, dstLen, dstWrote, srcLimit = srcLen;
20
 
21
 	if (nextNewLine) {
(-)b/lang/tcl86/files/patch-generic_tclIO.c (+21 lines)
Added Link Here
1
https://core.tcl-lang.org/tcl/info/24b9181478
2
3
--- generic/tclIO.c.orig	2020-12-11 17:46:22 UTC
4
+++ generic/tclIO.c
5
@@ -4277,6 +4277,7 @@ Write(
6
 				/* State info for channel */
7
     char *nextNewLine = NULL;
8
     int endEncoding, saved = 0, total = 0, flushed = 0, needNlFlush = 0;
9
+    char safe[BUFFER_PADDING];
10
 
11
     if (srcLen) {
12
         WillWrite(chanPtr);
13
@@ -4295,7 +4296,7 @@ Write(
14
 
15
     while (srcLen + saved + endEncoding > 0) {
16
 	ChannelBuffer *bufPtr;
17
-	char *dst, safe[BUFFER_PADDING];
18
+	char *dst;
19
 	int result, srcRead, dstLen, dstWrote, srcLimit = srcLen;
20
 
21
 	if (nextNewLine) {

Return to bug 258392