diff options
author | dkf <donal.k.fellows@manchester.ac.uk> | 2017-02-26 15:33:04 (GMT) |
---|---|---|
committer | dkf <donal.k.fellows@manchester.ac.uk> | 2017-02-26 15:33:04 (GMT) |
commit | 7088b7efe337d17d083c3b023cd2e8e31915f800 (patch) | |
tree | ef78c2d1c6d9e609ffd56e60c2882a85d154cd74 /generic/tclZlib.c | |
parent | 462ffc792711dc33c7d17b48fc3bdb65bee277de (diff) | |
parent | 13ccdabc079393fc674907b140859c53765b28ab (diff) | |
download | tcl-7088b7efe337d17d083c3b023cd2e8e31915f800.zip tcl-7088b7efe337d17d083c3b023cd2e8e31915f800.tar.gz tcl-7088b7efe337d17d083c3b023cd2e8e31915f800.tar.bz2 |
[25842c161f] Ensure that finalization of a zlib stream works.
Diffstat (limited to 'generic/tclZlib.c')
-rw-r--r-- | generic/tclZlib.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclZlib.c b/generic/tclZlib.c index c231f44..96b8318 100644 --- a/generic/tclZlib.c +++ b/generic/tclZlib.c @@ -1204,10 +1204,10 @@ Tcl_ZlibStreamPut( zshPtr->stream.avail_in = size; /* - * Must not do a zero-length compress. [Bug 25842c161] + * Must not do a zero-length compress unless finalizing. [Bug 25842c161] */ - if (size == 0) { + if (size == 0 && flush != Z_FINISH) { return TCL_OK; } |