summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2014-05-06 17:33:55 (GMT)
committerdgp <dgp@users.sourceforge.net>2014-05-06 17:33:55 (GMT)
commit6c0d722a0a6753769d3f933a724a37667f176638 (patch)
tree11f59723cc0cf44a623e7c543ab13e9204c362ae
parente3ee9f9e15df60c47593c2b50c17fefef1909e1d (diff)
downloadtcl-6c0d722a0a6753769d3f933a724a37667f176638.zip
tcl-6c0d722a0a6753769d3f933a724a37667f176638.tar.gz
tcl-6c0d722a0a6753769d3f933a724a37667f176638.tar.bz2
Symptom relief. Make test stop panicking.
This is not the proper final answer. ChannelBuffer management in FlushChannel is simply not robustly correct yet.
-rw-r--r--generic/tclIO.c5
1 files changed, 4 insertions, 1 deletions
diff --git a/generic/tclIO.c b/generic/tclIO.c
index 6bf28a1..dd4d489 100644
--- a/generic/tclIO.c
+++ b/generic/tclIO.c
@@ -2713,8 +2713,11 @@ FlushChannel(
statePtr->outQueueTail = NULL;
}
RecycleBuffer(statePtr, bufPtr, 0);
+ bufPtr = NULL;
+ }
+ if (bufPtr) {
+ ReleaseChannelBuffer(bufPtr);
}
- ReleaseChannelBuffer(bufPtr);
} /* Closes "while (1)". */
/*