summaryrefslogtreecommitdiffstats
path: root/generic/tclStubInit.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2019-02-19 20:16:25 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2019-02-19 20:16:25 (GMT)
commitb752d879c75b2b284c39120f000ad906c7506b87 (patch)
tree5c2e5f6801e0a410bb7504dec3917cdea6a287ef /generic/tclStubInit.c
parent52ed230e6f1f0f90a1ee63afa7a4d9948fd336ae (diff)
parent886343e50b064acf649c4bdabd7ebbe269249485 (diff)
downloadtcl-b752d879c75b2b284c39120f000ad906c7506b87.zip
tcl-b752d879c75b2b284c39120f000ad906c7506b87.tar.gz
tcl-b752d879c75b2b284c39120f000ad906c7506b87.tar.bz2
Merge 8.6
Diffstat (limited to 'generic/tclStubInit.c')
-rw-r--r--generic/tclStubInit.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclStubInit.c b/generic/tclStubInit.c
index 8429a2f..66bb305 100644
--- a/generic/tclStubInit.c
+++ b/generic/tclStubInit.c
@@ -333,7 +333,7 @@ Tcl_WinTCharToUtf(
wEnd = (wchar_t *)string + len;
for (w = (wchar_t *)string; w < wEnd; ) {
if (!blen && ((*w & 0xFC00) != 0xDC00)) {
- /* Special case for handling upper surrogates. */
+ /* Special case for handling high surrogates. */
p += Tcl_UniCharToUtf(-1, p);
}
blen = Tcl_UniCharToUtf(*w, p);
@@ -341,7 +341,7 @@ Tcl_WinTCharToUtf(
w++;
}
if (!blen) {
- /* Special case for handling upper surrogates. */
+ /* Special case for handling high surrogates. */
p += Tcl_UniCharToUtf(-1, p);
}
Tcl_DStringSetLength(dsPtr, oldLength + (p - result));