summaryrefslogtreecommitdiffstats
path: root/generic/tclStringObj.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2019-03-18 22:17:52 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2019-03-18 22:17:52 (GMT)
commit1dd829fb01e13e3c74113061a59bea80ad2b7860 (patch)
treedcdc8d774dddefcc32f84d5a8f1f54cc6219e729 /generic/tclStringObj.c
parenta7398e7fcb05ac1a37b88ee1be6c14a8b156e1a9 (diff)
parentec4d7da07dc725f100fb8d1ef0421b352ddd6b96 (diff)
downloadtcl-1dd829fb01e13e3c74113061a59bea80ad2b7860.zip
tcl-1dd829fb01e13e3c74113061a59bea80ad2b7860.tar.gz
tcl-1dd829fb01e13e3c74113061a59bea80ad2b7860.tar.bz2
Merge 8.7
Diffstat (limited to 'generic/tclStringObj.c')
-rw-r--r--generic/tclStringObj.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclStringObj.c b/generic/tclStringObj.c
index 6a0d796..590b1bd 100644
--- a/generic/tclStringObj.c
+++ b/generic/tclStringObj.c
@@ -1944,7 +1944,7 @@ Tcl_AppendFormatToObj(
}
break;
case 'c': {
- char buf[TCL_UTF_MAX] = "";
+ char buf[4] = "";
int code, length;
if (TclGetIntFromObj(interp, segment, &code) != TCL_OK) {