diff options
| author | dgp <dgp@users.sourceforge.net> | 2014-10-17 20:38:25 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2014-10-17 20:38:25 (GMT) |
| commit | 0fd15ee66c915deec56006cf24443acae807c5b5 (patch) | |
| tree | b54de02034e883679513f73ba0ee8aedfa570a0c | |
| parent | 1a3088ac3379f8ef5645a6fb601ed55a99c3870b (diff) | |
| parent | 8725bdd35e6d66a97627786c0972a9cc5c502828 (diff) | |
| download | tcl-experiment.zip tcl-experiment.tar.gz tcl-experiment.tar.bz2 | |
merge 8.5experiment
| -rw-r--r-- | generic/tclIO.c | 5 |
1 files changed, 0 insertions, 5 deletions
diff --git a/generic/tclIO.c b/generic/tclIO.c index 12f2af4..062be43 100644 --- a/generic/tclIO.c +++ b/generic/tclIO.c @@ -4453,7 +4453,6 @@ Tcl_GetsObj( eof = NULL; inEofChar = statePtr->inEofChar; - ResetFlag(statePtr, CHANNEL_BLOCKED); while (1) { if (dst >= dstEnd) { if (FilterInputBytes(chanPtr, &gs) != 0) { @@ -4623,10 +4622,6 @@ Tcl_GetsObj( } goto gotEOL; } - if (GotFlag(statePtr, CHANNEL_BLOCKED|CHANNEL_NONBLOCKING) - == (CHANNEL_BLOCKED|CHANNEL_NONBLOCKING)) { - goto restore; - } dst = dstEnd; } |