summaryrefslogtreecommitdiffstats
path: root/generic/tclEncoding.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2022-01-14 22:34:06 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2022-01-14 22:34:06 (GMT)
commit9bcfb6703d6eaa02bfcaad401aa83ce48309d4a1 (patch)
treee26d0592d28d86592b9b44ebc84073821f2b6099 /generic/tclEncoding.c
parentc513699e2c1d661da77c76813d7bdac494bfae91 (diff)
downloadtcl-9bcfb6703d6eaa02bfcaad401aa83ce48309d4a1.zip
tcl-9bcfb6703d6eaa02bfcaad401aa83ce48309d4a1.tar.gz
tcl-9bcfb6703d6eaa02bfcaad401aa83ce48309d4a1.tar.bz2
Proposed fix for [6474fbd934]: Tcl 8.7a5: why utf-8 is different?
Diffstat (limited to 'generic/tclEncoding.c')
-rw-r--r--generic/tclEncoding.c3
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);