diff options
| author | griffin <briang42@easystreet.net> | 2023-06-30 14:34:09 (GMT) |
|---|---|---|
| committer | griffin <briang42@easystreet.net> | 2023-06-30 14:34:09 (GMT) |
| commit | eb1f9c99892df6f4227bfedc9ddd3ade75edcc4e (patch) | |
| tree | dab4b59fd48a4f8fc04057e2901fe1a6603afb54 /generic/tclEncoding.c | |
| parent | bd647296865ed931db4903444b182da472f91cae (diff) | |
| parent | cd82527608d6856590780a5c0cf5b6fde1dfbadf (diff) | |
| download | tcl-eb1f9c99892df6f4227bfedc9ddd3ade75edcc4e.zip tcl-eb1f9c99892df6f4227bfedc9ddd3ade75edcc4e.tar.gz tcl-eb1f9c99892df6f4227bfedc9ddd3ade75edcc4e.tar.bz2 | |
merge trunk
Diffstat (limited to 'generic/tclEncoding.c')
| -rw-r--r-- | generic/tclEncoding.c | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/generic/tclEncoding.c b/generic/tclEncoding.c index 3ab3de9..b02a422 100644 --- a/generic/tclEncoding.c +++ b/generic/tclEncoding.c @@ -4058,11 +4058,8 @@ EscapeToUtfProc( if ((checked == dataPtr->numSubTables + 2) || (flags & TCL_ENCODING_END)) { if (!PROFILE_STRICT(flags)) { - /* - * Skip the unknown escape sequence. TODO - bug? - * May be replace with UNICODE_REPLACE_CHAR? - */ - + /* Unknown escape sequence */ + dst += Tcl_UniCharToUtf(UNICODE_REPLACE_CHAR, dst); src += longest; continue; } |