From 773a30a541bb7f3681c3e0dc08b5c9d7e23fbaed Mon Sep 17 00:00:00 2001
From: "jan.nijtmans" <nijtmans@users.sourceforge.net>
Date: Tue, 2 Mar 2021 10:53:30 +0000
Subject: Using 0xFC00 is more readable here than ~0x3FF. It's sufficient
becauwe ch1 and ch2 are only 16-bit. Backported from 8.7
---
generic/tclUtf.c | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/generic/tclUtf.c b/generic/tclUtf.c
index 65a3f41..57e58c1 100644
--- a/generic/tclUtf.c
+++ b/generic/tclUtf.c
@@ -1296,11 +1296,11 @@ Tcl_UtfNcmp(
if (ch1 != ch2) {
#if TCL_UTF_MAX == 4
/* Surrogates always report higher than non-surrogates */
- if (((ch1 & ~0x3FF) == 0xD800)) {
- if ((ch2 & ~0x3FF) != 0xD800) {
+ if (((ch1 & 0xFC00) == 0xD800)) {
+ if ((ch2 & 0xFC00) != 0xD800) {
return ch1;
}
- } else if ((ch2 & ~0x3FF) == 0xD800) {
+ } else if ((ch2 & 0xFC00) == 0xD800) {
return -ch2;
}
#endif
--
cgit v0.12