summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2022-07-14 10:53:55 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2022-07-14 10:53:55 (GMT)
commit554ed37525a85518448300c6cdfd33d7d2684425 (patch)
treee1494c27cd0341f445f368ce7737fe8268567a4b
parent037f0d4f7e7b70aaa44f11a934ed52c0fabca0b3 (diff)
downloadtcl-554ed37525a85518448300c6cdfd33d7d2684425.zip
tcl-554ed37525a85518448300c6cdfd33d7d2684425.tar.gz
tcl-554ed37525a85518448300c6cdfd33d7d2684425.tar.bz2
Same bug-fix as [b79df322a9], but then for Tcl_AppendUnicodeToObj()
-rw-r--r--generic/tclStringObj.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclStringObj.c b/generic/tclStringObj.c
index b9d603d..7ce1cdc 100644
--- a/generic/tclStringObj.c
+++ b/generic/tclStringObj.c
@@ -1744,7 +1744,7 @@ Tcl_AppendUnicodeToObj(
return;
}
- SetStringFromAny(NULL, objPtr);
+ SetUTF16StringFromAny(NULL, objPtr);
stringPtr = GET_STRING(objPtr);
stringPtr = stringAttemptRealloc(stringPtr, stringPtr->numChars + length);
memcpy(&stringPtr->unicode[stringPtr->numChars], unicode, length);