diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-04-20 10:20:57 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-04-20 10:20:57 (GMT) |
| commit | ef773d518ee5df3377d805762539f0da72c33f36 (patch) | |
| tree | 9686bf4be018af59a09cd011230104297aafdd3f /generic/tclIO.c | |
| parent | c04affa12025f2b856fd5d3148284c1ee03571ab (diff) | |
| parent | b80552437af293244ff1d5c1418ae376c4efd9bd (diff) | |
| download | tcl-ef773d518ee5df3377d805762539f0da72c33f36.zip tcl-ef773d518ee5df3377d805762539f0da72c33f36.tar.gz tcl-ef773d518ee5df3377d805762539f0da72c33f36.tar.bz2 | |
Merge 8.7
Diffstat (limited to 'generic/tclIO.c')
| -rw-r--r-- | generic/tclIO.c | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/generic/tclIO.c b/generic/tclIO.c index 98675da..00bb016 100644 --- a/generic/tclIO.c +++ b/generic/tclIO.c @@ -4329,7 +4329,6 @@ Write( bufPtr->nextAdded += saved; saved = 0; } - PreserveChannelBuffer(bufPtr); dst = InsertPoint(bufPtr); dstLen = SpaceLeft(bufPtr); @@ -4349,7 +4348,6 @@ Write( * We're reading from invalid/incomplete UTF-8. */ - ReleaseChannelBuffer(bufPtr); if (total == 0) { Tcl_SetErrno(EILSEQ); return -1; @@ -4423,7 +4421,6 @@ Write( if (IsBufferFull(bufPtr)) { if (FlushChannel(NULL, chanPtr, 0) != 0) { - ReleaseChannelBuffer(bufPtr); return -1; } flushed += statePtr->bufSize; @@ -4443,7 +4440,6 @@ Write( needNlFlush = 0; } } - ReleaseChannelBuffer(bufPtr); } if ((flushed < total) && (GotFlag(statePtr, CHANNEL_UNBUFFERED) || (needNlFlush && GotFlag(statePtr, CHANNEL_LINEBUFFERED)))) { |