diff options
| author | dgp <dgp@users.sourceforge.net> | 2015-04-21 18:23:53 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2015-04-21 18:23:53 (GMT) |
| commit | f7192786b56023262c9f1d0c75bafa5120893748 (patch) | |
| tree | b4ad5a1943a75fb31271b45419751a4806cbaf8a | |
| parent | 474530cbab83e3898f889a99f8e4421296a34db5 (diff) | |
| download | tcl-bug_879a0747be.zip tcl-bug_879a0747be.tar.gz tcl-bug_879a0747be.tar.bz2 | |
Proposed fix for bug 879a0747bebug_879a0747be
| -rw-r--r-- | generic/tclIO.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclIO.c b/generic/tclIO.c index 5a25243..8b9ab31 100644 --- a/generic/tclIO.c +++ b/generic/tclIO.c @@ -5566,7 +5566,7 @@ ReadChars( int code = Tcl_ExternalToUtf(NULL, encoding, src, srcLen, statePtr->inputEncodingFlags & (bufPtr->nextPtr - ? ~0 : ~TCL_ENCODING_END), &statePtr->inputEncodingState, + ? ~TCL_ENCODING_END : ~0), &statePtr->inputEncodingState, dst, dstLimit, &srcRead, &dstDecoded, &numChars); /* @@ -5686,7 +5686,7 @@ ReadChars( Tcl_ExternalToUtf(NULL, encoding, src, srcLen, statePtr->inputEncodingFlags & (bufPtr->nextPtr - ? ~0 : ~TCL_ENCODING_END), &statePtr->inputEncodingState, + ? ~TCL_ENCODING_END : ~0), &statePtr->inputEncodingState, buffer, TCL_UTF_MAX + 2, &read, &decoded, &count); if (count == 2) { |