diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-08-13 13:32:54 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-08-13 13:32:54 (GMT) |
| commit | 065b9c0aa3a44ee966f24dc67214791e7c823305 (patch) | |
| tree | 86a98f63f31c66195a463a3d130a950795565429 /generic/tclEncoding.c | |
| parent | 9b629a67879daa8b1dd0aa7bfe7a9fc9fb033f19 (diff) | |
| parent | 1163d3e897226fba1f21a2fc7e8400867f329e23 (diff) | |
| download | tcl-065b9c0aa3a44ee966f24dc67214791e7c823305.zip tcl-065b9c0aa3a44ee966f24dc67214791e7c823305.tar.gz tcl-065b9c0aa3a44ee966f24dc67214791e7c823305.tar.bz2 | |
Fix [2f22a7364d]: cesu-8 encoding gives same result for different strings
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 ee80ba4..64fb1b6 100644 --- a/generic/tclEncoding.c +++ b/generic/tclEncoding.c @@ -2560,7 +2560,7 @@ UtfToUtfProc( *dst++ = 0xED; *dst++ = (char) (((ch >> 16) & 0x0F) | 0xA0); *dst++ = (char) (((ch >> 10) & 0x3F) | 0x80); - ch = (ch & 0x0CFF) | 0xDC00; + ch = (ch & 0x03FF) | 0xDC00; } *dst++ = (char)(((ch >> 12) | 0xE0) & 0xEF); *dst++ = (char)(((ch >> 6) | 0x80) & 0xBF); |