summaryrefslogtreecommitdiffstats
path: root/win/tclWin32Dll.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2019-02-19 20:17:01 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2019-02-19 20:17:01 (GMT)
commitbe2eb79067e63e0345d94834e85f6f7ecf659625 (patch)
treec4d124aeabc00a9b783dbe865fb4863df753117e /win/tclWin32Dll.c
parenta3632778ce4707fa88124136b1fa8f078b7eff1c (diff)
parentb752d879c75b2b284c39120f000ad906c7506b87 (diff)
downloadtcl-be2eb79067e63e0345d94834e85f6f7ecf659625.zip
tcl-be2eb79067e63e0345d94834e85f6f7ecf659625.tar.gz
tcl-be2eb79067e63e0345d94834e85f6f7ecf659625.tar.bz2
Merge 8.7
Diffstat (limited to 'win/tclWin32Dll.c')
-rw-r--r--win/tclWin32Dll.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/win/tclWin32Dll.c b/win/tclWin32Dll.c
index ff29309..5c04db6 100644
--- a/win/tclWin32Dll.c
+++ b/win/tclWin32Dll.c
@@ -567,7 +567,7 @@ Tcl_WinTCharToUtf(
wEnd = (TCHAR *)string + len;
for (w = (TCHAR *)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);
@@ -575,7 +575,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));