Posted to tcl by rmax at Wed Aug 03 19:39:13 GMT 2022view raw
- --- generic/tclIO.c
- +++ generic/tclIO.c
- @@ -4454,8 +4454,8 @@
- }
- }
- }
- - if ((flushed < total) && (GotFlag(statePtr, CHANNEL_UNBUFFERED) ||
- - (needNlFlush && GotFlag(statePtr, CHANNEL_LINEBUFFERED)))) {
- + if (((flushed < total) && (GotFlag(statePtr, CHANNEL_UNBUFFERED))) ||
- + (needNlFlush && GotFlag(statePtr, CHANNEL_LINEBUFFERED))) {
- if (FlushChannel(NULL, chanPtr, 0) != 0) {
- return -1;
- }