diff options
author | bch <brad.harder@gmail.com> | 2015-02-07 21:12:18 (GMT) |
---|---|---|
committer | bch <brad.harder@gmail.com> | 2015-02-07 21:12:18 (GMT) |
commit | 1dcecc86911575eedfda9caede53f086bbbf0ad4 (patch) | |
tree | 4d6163ec31594e68e75a1b18e2b4de0fbb18c728 /generic/tclIO.c | |
parent | 80c303fe985156a04d9565cc50a77e52c4f62269 (diff) | |
parent | b45286725aeaf89d746d3f7edc0f125a4c0950a3 (diff) | |
download | tcl-1dcecc86911575eedfda9caede53f086bbbf0ad4.zip tcl-1dcecc86911575eedfda9caede53f086bbbf0ad4.tar.gz tcl-1dcecc86911575eedfda9caede53f086bbbf0ad4.tar.bz2 |
merge [trunk]
Diffstat (limited to 'generic/tclIO.c')
-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 eb33106..025708b 100644 --- a/generic/tclIO.c +++ b/generic/tclIO.c @@ -5743,8 +5743,8 @@ DoReadChars( chanPtr = statePtr->topChanPtr; TclChannelPreserve((Tcl_Channel)chanPtr); - /* Must clear the BLOCKED flag here since we check before reading */ - ResetFlag(statePtr, CHANNEL_BLOCKED); + /* Must clear the BLOCKED|EOF flags here since we check before reading */ + ResetFlag(statePtr, CHANNEL_BLOCKED|CHANNEL_EOF); for (copied = 0; (unsigned) toRead > 0; ) { copiedNow = -1; if (statePtr->inQueueHead != NULL) { |