diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-02-06 12:33:35 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-02-06 12:33:35 (GMT) |
| commit | 667d40ea7d58b8be65eafdda5c019f96ec05d635 (patch) | |
| tree | 839003d77dc6dd74a4e0a2e3b3bc7d862dd8f533 /generic/tclEncoding.c | |
| parent | 07e94bea99230a585a50de7ec548831e13bf79f7 (diff) | |
| download | tcl-667d40ea7d58b8be65eafdda5c019f96ec05d635.zip tcl-667d40ea7d58b8be65eafdda5c019f96ec05d635.tar.gz tcl-667d40ea7d58b8be65eafdda5c019f96ec05d635.tar.bz2 | |
Minor code simplification
Diffstat (limited to 'generic/tclEncoding.c')
| -rw-r--r-- | generic/tclEncoding.c | 12 |
1 files changed, 2 insertions, 10 deletions
diff --git a/generic/tclEncoding.c b/generic/tclEncoding.c index 2d1c983..727ed89 100644 --- a/generic/tclEncoding.c +++ b/generic/tclEncoding.c @@ -2668,16 +2668,8 @@ cesu8: dst += Tcl_UniCharToUtf(ch, dst); ch = low; } - } else if (PROFILE_STRICT(profile) && - (!(flags & ENCODING_INPUT)) && - SURROGATE(ch)) { - result = TCL_CONVERT_UNKNOWN; - src = saveSrc; - break; - } else if (PROFILE_STRICT(profile) && - (flags & ENCODING_INPUT) && - SURROGATE(ch)) { - result = TCL_CONVERT_SYNTAX; + } else if (PROFILE_STRICT(profile) && SURROGATE(ch)) { + result = (flags & ENCODING_INPUT) ? TCL_CONVERT_SYNTAX : TCL_CONVERT_UNKNOWN; src = saveSrc; break; } |