summaryrefslogtreecommitdiffstats
path: root/generic
diff options
context:
space:
mode:
Diffstat (limited to 'generic')
-rw-r--r--generic/tcl.h2
-rw-r--r--generic/tclEncoding.c2
2 files changed, 2 insertions, 2 deletions
diff --git a/generic/tcl.h b/generic/tcl.h
index 67ed6ff..2d529b7 100644
--- a/generic/tcl.h
+++ b/generic/tcl.h
@@ -2479,7 +2479,7 @@ EXTERN int TclZipfs_AppHook(int *argc, char ***argv);
++(objPtr)->refCount
/*
* Use do/while0 idiom for optimum correctness without compiler warnings.
- * http://c2.com/cgi/wiki?TrivialDoWhileLoop
+ * https://wiki.c2.com/?TrivialDoWhileLoop
*/
# undef Tcl_DecrRefCount
# define Tcl_DecrRefCount(objPtr) \
diff --git a/generic/tclEncoding.c b/generic/tclEncoding.c
index 21c254e..9367863 100644
--- a/generic/tclEncoding.c
+++ b/generic/tclEncoding.c
@@ -2280,7 +2280,7 @@ UtfToUtfProc(
break;
}
src += len;
- if (!(flags & TCL_ENCODING_UTF)) {
+ if (!(flags & TCL_ENCODING_UTF) && (ch > 0x3FF)) {
if (ch > 0xFFFF) {
/* CESU-8 6-byte sequence for chars > U+FFFF */
ch -= 0x10000;