diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-09-13 20:06:39 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-09-13 20:06:39 (GMT) |
| commit | 30983dad6f4e062faeb8bebbfe3a5a0e62f2d9f8 (patch) | |
| tree | a987a59db940aeb1b1cb6bad5906245d9f76c06d /generic/tclEncoding.c | |
| parent | dfa2b92acec26c1eff9f3e9476d6b0c4042064b9 (diff) | |
| download | tcl-30983dad6f4e062faeb8bebbfe3a5a0e62f2d9f8.zip tcl-30983dad6f4e062faeb8bebbfe3a5a0e62f2d9f8.tar.gz tcl-30983dad6f4e062faeb8bebbfe3a5a0e62f2d9f8.tar.bz2 | |
Fix [63325009a8]: \u0400 conversion to and from cesu-8 fails.
Diffstat (limited to 'generic/tclEncoding.c')
| -rw-r--r-- | generic/tclEncoding.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclEncoding.c b/generic/tclEncoding.c index 95186af..7ac1c39 100644 --- a/generic/tclEncoding.c +++ b/generic/tclEncoding.c @@ -2595,7 +2595,7 @@ UtfToUtfProc( const char *saveSrc = src; src += len; - if (!(flags & ENCODING_UTF) && !(flags & ENCODING_INPUT) && (ch > 0x3FF)) { + if (!(flags & ENCODING_UTF) && !(flags & ENCODING_INPUT) && (ch > 0x7FF)) { if (ch > 0xFFFF) { /* CESU-8 6-byte sequence for chars > U+FFFF */ ch -= 0x10000; |