diff options
| author | apnadkarni <apnmbx-wits@yahoo.com> | 2023-06-29 11:09:29 (GMT) |
|---|---|---|
| committer | apnadkarni <apnmbx-wits@yahoo.com> | 2023-06-29 11:09:29 (GMT) |
| commit | 6ae93efff085e5d96d7e8e658ab64992e9e1191b (patch) | |
| tree | 4377796fbbb44af185109ab146fa1fe8dec820e9 /generic/tclEncoding.c | |
| parent | b95bc2b4ce35527780a8ac02d2b070a3c3bdfa2a (diff) | |
| download | tcl-6ae93efff085e5d96d7e8e658ab64992e9e1191b.zip tcl-6ae93efff085e5d96d7e8e658ab64992e9e1191b.tar.gz tcl-6ae93efff085e5d96d7e8e658ab64992e9e1191b.tar.bz2 | |
Bug [6a3e2cb0f0] - invalid bytes in escape encodings
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 32878b0..f9f93fe 100644 --- a/generic/tclEncoding.c +++ b/generic/tclEncoding.c @@ -3961,11 +3961,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; } |