summaryrefslogtreecommitdiffstats
path: root/generic/tclEncoding.c
diff options
context:
space:
mode:
authorapnadkarni <apnmbx-wits@yahoo.com>2024-08-15 06:13:58 (GMT)
committerapnadkarni <apnmbx-wits@yahoo.com>2024-08-15 06:13:58 (GMT)
commit565ddcb73d3187e4ba45b28fe2c7a5315bb88b3e (patch)
tree013783a59715e12dd42d36a2a4d8d2ae4e8f506e /generic/tclEncoding.c
parentbefb4fd943a4fb537ac479745d3f84f7d4f4c968 (diff)
parent782846e3a2238522de0ac5cad12c5ae96e850aaa (diff)
downloadtcl-565ddcb73d3187e4ba45b28fe2c7a5315bb88b3e.zip
tcl-565ddcb73d3187e4ba45b28fe2c7a5315bb88b3e.tar.gz
tcl-565ddcb73d3187e4ba45b28fe2c7a5315bb88b3e.tar.bz2
Merge trunk
Diffstat (limited to 'generic/tclEncoding.c')
-rw-r--r--generic/tclEncoding.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclEncoding.c b/generic/tclEncoding.c
index ee80ba4..64fb1b6 100644
--- a/generic/tclEncoding.c
+++ b/generic/tclEncoding.c
@@ -2560,7 +2560,7 @@ UtfToUtfProc(
*dst++ = 0xED;
*dst++ = (char) (((ch >> 16) & 0x0F) | 0xA0);
*dst++ = (char) (((ch >> 10) & 0x3F) | 0x80);
- ch = (ch & 0x0CFF) | 0xDC00;
+ ch = (ch & 0x03FF) | 0xDC00;
}
*dst++ = (char)(((ch >> 12) | 0xE0) & 0xEF);
*dst++ = (char)(((ch >> 6) | 0x80) & 0xBF);