summaryrefslogtreecommitdiffstats
path: root/generic/tclIO.c
diff options
context:
space:
mode:
authordgp@users.sourceforge.net <dgp>2015-01-02 22:42:12 (GMT)
committerdgp@users.sourceforge.net <dgp>2015-01-02 22:42:12 (GMT)
commitdc18b6b448dadea8fd1fa1140730510c968539fc (patch)
tree79010bc24f9c7b7c4383f2bb4f857c1556857286 /generic/tclIO.c
parent5da1cb6f0287acbf6700dcafd43a54fdb5fccb45 (diff)
downloadtcl-dc18b6b448dadea8fd1fa1140730510c968539fc.zip
tcl-dc18b6b448dadea8fd1fa1140730510c968539fc.tar.gz
tcl-dc18b6b448dadea8fd1fa1140730510c968539fc.tar.bz2
Now that we're using TCL_ENCODING_NO_TERMINATE - be careful about acting on
the contents of dst -- they could be leftovers. Only check bytes reported to have been written and take care to get the assertions right.
Diffstat (limited to 'generic/tclIO.c')
-rw-r--r--generic/tclIO.c3
1 files changed, 1 insertions, 2 deletions
diff --git a/generic/tclIO.c b/generic/tclIO.c
index 9bbf2a6..a9091af 100644
--- a/generic/tclIO.c
+++ b/generic/tclIO.c
@@ -6198,9 +6198,8 @@ ReadChars(
* empty string.
*/
- if (dst[0] == '\n') {
+ if (dstRead == 1 && dst[0] == '\n') {
assert(statePtr->inputTranslation == TCL_TRANSLATE_AUTO);
- assert(dstRead == 1);
goto consume;
}