diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-03-18 22:17:52 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-03-18 22:17:52 (GMT) |
commit | 1dd829fb01e13e3c74113061a59bea80ad2b7860 (patch) | |
tree | dcdc8d774dddefcc32f84d5a8f1f54cc6219e729 /generic/tclStringObj.c | |
parent | a7398e7fcb05ac1a37b88ee1be6c14a8b156e1a9 (diff) | |
parent | ec4d7da07dc725f100fb8d1ef0421b352ddd6b96 (diff) | |
download | tcl-1dd829fb01e13e3c74113061a59bea80ad2b7860.zip tcl-1dd829fb01e13e3c74113061a59bea80ad2b7860.tar.gz tcl-1dd829fb01e13e3c74113061a59bea80ad2b7860.tar.bz2 |
Merge 8.7
Diffstat (limited to 'generic/tclStringObj.c')
-rw-r--r-- | generic/tclStringObj.c | 2 |
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) { |