summaryrefslogtreecommitdiffstats
path: root/generic/tclStringObj.c
diff options
context:
space:
mode:
authorpooryorick <com.digitalsmarties@pooryorick.com>2024-08-27 10:50:11 (GMT)
committerpooryorick <com.digitalsmarties@pooryorick.com>2024-08-27 10:50:11 (GMT)
commit653e0a778fe3ba7f9f7341265060bfba4ee5d6b2 (patch)
tree7cb3587ab6d5e124eb12dce6cf01b00274bbc0a3 /generic/tclStringObj.c
parent4cf671c58ed9eaf1c54eacf3b4851e383f45dbd9 (diff)
downloadtcl-653e0a778fe3ba7f9f7341265060bfba4ee5d6b2.zip
tcl-653e0a778fe3ba7f9f7341265060bfba4ee5d6b2.tar.gz
tcl-653e0a778fe3ba7f9f7341265060bfba4ee5d6b2.tar.bz2
Fix logic that was inadvertently inverted back in [295715a1b1b2c3d5]
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 258d02b..f4428d1 100644
--- a/generic/tclStringObj.c
+++ b/generic/tclStringObj.c
@@ -3191,7 +3191,7 @@ TclStringCat(
binary = 0;
if (ov > objv+1 && ISCONTINUATION(TclGetString(objPtr))) {
forceUniChar = 1;
- } else if ((objPtr->typePtr) && TclHasInternalRep(objPtr, &tclStringType)) {
+ } else if ((objPtr->typePtr) && !TclHasInternalRep(objPtr, &tclStringType)) {
/* Prevent shimmer of non-string types. */
allowUniChar = 0;
}