summaryrefslogtreecommitdiffstats
path: root/generic
diff options
context:
space:
mode:
authordkf <donal.k.fellows@manchester.ac.uk>2013-02-11 08:57:53 (GMT)
committerdkf <donal.k.fellows@manchester.ac.uk>2013-02-11 08:57:53 (GMT)
commit30f60173c4738c76675b58db3a7a5aaa62ca79ea (patch)
tree2438cfef7721fcd81a8173636c444c7fbacdc791 /generic
parentccb47ed928b891b5170b280056291ec35987e4ee (diff)
parentc42232d2a15a091543947a08d7d45379d19bbfb4 (diff)
downloadtcl-30f60173c4738c76675b58db3a7a5aaa62ca79ea.zip
tcl-30f60173c4738c76675b58db3a7a5aaa62ca79ea.tar.gz
tcl-30f60173c4738c76675b58db3a7a5aaa62ca79ea.tar.bz2
Fix [Bug 3603553].
Diffstat (limited to 'generic')
-rw-r--r--generic/tclZlib.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclZlib.c b/generic/tclZlib.c
index 47091de..ff887c8 100644
--- a/generic/tclZlib.c
+++ b/generic/tclZlib.c
@@ -3111,7 +3111,7 @@ ZlibTransformOutput(
e = deflate(&cd->outStream, Z_NO_FLUSH);
produced = cd->outAllocated - cd->outStream.avail_out;
- if (e == Z_OK && cd->outStream.avail_out > 0) {
+ if (e == Z_OK && produced > 0) {
if (Tcl_WriteRaw(cd->parent, cd->outBuffer, produced) < 0) {
*errorCodePtr = Tcl_GetErrno();
return -1;