From 6d656d18330f1b128b4587401e2bd4be7afbb0df Mon Sep 17 00:00:00 2001 From: dgp Date: Thu, 2 Apr 2020 22:05:52 +0000 Subject: typo --- generic/tclUtf.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/generic/tclUtf.c b/generic/tclUtf.c index 8f02790..c5dc30a 100644 --- a/generic/tclUtf.c +++ b/generic/tclUtf.c @@ -2179,7 +2179,7 @@ TclUtfToUCS4( #if TCL_UTF_MAX == 4 /* 4-byte UTF-8 is supported; decode surrogates */ - if ((ch >= 0xD800) && len < 3) + if ((ch >= 0xD800) && len < 3) { len += Tcl_UtfToUniChar(src + len, &ch); fullchar = (((fullchar & 0x3FF) << 10) | (ch & 0x3FF)) + 0x10000; } -- cgit v0.12