diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-01-15 17:02:29 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-01-15 17:02:29 (GMT) |
| commit | 2f374ff67ee30bcc15752b48e36729c583615a12 (patch) | |
| tree | e26d0592d28d86592b9b44ebc84073821f2b6099 /generic/tclEncoding.c | |
| parent | c513699e2c1d661da77c76813d7bdac494bfae91 (diff) | |
| parent | 9bcfb6703d6eaa02bfcaad401aa83ce48309d4a1 (diff) | |
| download | tcl-2f374ff67ee30bcc15752b48e36729c583615a12.zip tcl-2f374ff67ee30bcc15752b48e36729c583615a12.tar.gz tcl-2f374ff67ee30bcc15752b48e36729c583615a12.tar.bz2 | |
Fix [6474fbd934]: Tcl 8.7a5: why utf-8 is different?
Diffstat (limited to 'generic/tclEncoding.c')
| -rw-r--r-- | generic/tclEncoding.c | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/generic/tclEncoding.c b/generic/tclEncoding.c index 57c6148..037beed 100644 --- a/generic/tclEncoding.c +++ b/generic/tclEncoding.c @@ -2323,9 +2323,6 @@ UtfToUtfProc( src = saveSrc; break; } - if (!(flags & TCL_ENCODING_MODIFIED)) { - ch = 0xFFFD; - } cesu8: *dst++ = (char) (((ch >> 12) | 0xE0) & 0xEF); *dst++ = (char) (((ch >> 6) | 0x80) & 0xBF); |