diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-03-21 09:57:03 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-03-21 09:57:03 (GMT) |
| commit | 04234b55afe944221c2b003572689431778c7c88 (patch) | |
| tree | a403b3a0cd5da9d125da865c5d33507df472a330 /generic | |
| parent | a0b26511ec3f53545e575b609822ad525be69118 (diff) | |
| parent | 64aaad2c4cff92f081027f8e9f82dbe19abe393b (diff) | |
| download | tcl-04234b55afe944221c2b003572689431778c7c88.zip tcl-04234b55afe944221c2b003572689431778c7c88.tar.gz tcl-04234b55afe944221c2b003572689431778c7c88.tar.bz2 | |
Fix [4dbfa46caa]: TIP #601 bug: handling of '-buffersize'
Diffstat (limited to 'generic')
| -rw-r--r-- | generic/tclEncoding.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclEncoding.c b/generic/tclEncoding.c index 78c96fd..fd0386c 100644 --- a/generic/tclEncoding.c +++ b/generic/tclEncoding.c @@ -2375,7 +2375,7 @@ UtfToUtfProc( */ if (flags & TCL_ENCODING_MODIFIED) { - if (STOPONERROR) { + if ((STOPONERROR) && (flags & TCL_ENCODING_CHAR_LIMIT)) { result = TCL_CONVERT_MULTIBYTE; break; } @@ -3156,7 +3156,7 @@ TableFromUtfProc( word = fromUnicode[(ch >> 8)][ch & 0xFF]; if ((word == 0) && (ch != 0)) { - if (STOPONERROR) { + if ((STOPONERROR) && (flags & TCL_ENCODING_CHAR_LIMIT)) { result = TCL_CONVERT_UNKNOWN; break; } |