diff options
| author | dgp <dgp@users.sourceforge.net> | 2014-05-06 22:34:45 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2014-05-06 22:34:45 (GMT) |
| commit | e35a33106d2918d82903fa94e973f42fd5f28a1d (patch) | |
| tree | d1ab9b5ceb34d43fabcc2e81a6c274c81b06a008 /generic/tclIO.c | |
| parent | 0fc3bdcc7e6bd2903a1e84017073bf39dff8a3ad (diff) | |
| download | tcl-e35a33106d2918d82903fa94e973f42fd5f28a1d.zip tcl-e35a33106d2918d82903fa94e973f42fd5f28a1d.tar.gz tcl-e35a33106d2918d82903fa94e973f42fd5f28a1d.tar.bz2 | |
Stop memory leak in io-29.27.
Diffstat (limited to 'generic/tclIO.c')
| -rw-r--r-- | generic/tclIO.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/generic/tclIO.c b/generic/tclIO.c index 2f652e7..fc3722c 100644 --- a/generic/tclIO.c +++ b/generic/tclIO.c @@ -2613,6 +2613,7 @@ FlushChannel( */ DiscardOutputQueued(statePtr); + ReleaseChannelBuffer(bufPtr); continue; } else { wroteSome = 1; |