diff options
Diffstat (limited to 'generic/tclStringObj.c')
| -rw-r--r-- | generic/tclStringObj.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclStringObj.c b/generic/tclStringObj.c index 493378c..72e4a3d 100644 --- a/generic/tclStringObj.c +++ b/generic/tclStringObj.c @@ -2003,7 +2003,7 @@ Tcl_AppendFormatToObj( length = Tcl_UniCharToUtf(code, buf); #if TCL_UTF_MAX > 3 if (!length) { - /* Special case for handling upper surrogates. */ + /* Special case for handling high surrogates. */ length = Tcl_UniCharToUtf(-1, buf); } #endif |