From 211b51a7cdf8b75a919fdcc1baa04348625cc559 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Thu, 2 Dec 2004 04:43:13 +0000
Subject: [PATCH] .

original commit: 3d81e08c8f85d6840d207f2f934143a65948706a
---
 collects/mzlib/deflate.ss | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/collects/mzlib/deflate.ss b/collects/mzlib/deflate.ss
index 5e84565..ffdeb27 100644
--- a/collects/mzlib/deflate.ss
+++ b/collects/mzlib/deflate.ss
@@ -2221,7 +2221,9 @@
   
   (deflate-inner in out)
 
-  (flush_outbuf))
+  (flush_outbuf)
+
+  (values bytes_in bytes_out crc))
 
 (define (gzip-through-ports in out origname time_stamp)