summaryrefslogtreecommitdiffstats
path: root/generic/tclIO.c
diff options
context:
space:
mode:
authorpooryorick <com.digitalsmarties@pooryorick.com>2022-04-20 08:49:56 (GMT)
committerpooryorick <com.digitalsmarties@pooryorick.com>2022-04-20 08:49:56 (GMT)
commit85e07894dd32b71f4f609a27540b579175eea23a (patch)
tree5782480c3b0105d8a8bf69085f3a5e64b81a027e /generic/tclIO.c
parentb9a742cb40113c2ef73661316577162125e8fb22 (diff)
downloadtcl-85e07894dd32b71f4f609a27540b579175eea23a.zip
tcl-85e07894dd32b71f4f609a27540b579175eea23a.tar.gz
tcl-85e07894dd32b71f4f609a27540b579175eea23a.tar.bz2
Remove some unnecessary buffer reference counting in Write(). The reference
counting in FlushChannel() has got it covered.
Diffstat (limited to 'generic/tclIO.c')
-rw-r--r--generic/tclIO.c4
1 files changed, 0 insertions, 4 deletions
diff --git a/generic/tclIO.c b/generic/tclIO.c
index 92bd91b..aa0a5a6 100644
--- a/generic/tclIO.c
+++ b/generic/tclIO.c
@@ -4363,7 +4363,6 @@ Write(
bufPtr->nextAdded += saved;
saved = 0;
}
- PreserveChannelBuffer(bufPtr);
dst = InsertPoint(bufPtr);
dstLen = SpaceLeft(bufPtr);
@@ -4383,7 +4382,6 @@ Write(
* We're reading from invalid/incomplete UTF-8.
*/
- ReleaseChannelBuffer(bufPtr);
if (total == 0) {
Tcl_SetErrno(EILSEQ);
return -1;
@@ -4457,7 +4455,6 @@ Write(
if (IsBufferFull(bufPtr)) {
if (FlushChannel(NULL, chanPtr, 0) != 0) {
- ReleaseChannelBuffer(bufPtr);
return -1;
}
flushed += statePtr->bufSize;
@@ -4477,7 +4474,6 @@ Write(
needNlFlush = 0;
}
}
- ReleaseChannelBuffer(bufPtr);
}
if ((flushed < total) && (GotFlag(statePtr, CHANNEL_UNBUFFERED) ||
(needNlFlush && GotFlag(statePtr, CHANNEL_LINEBUFFERED)))) {