</b> <i>stream</i> => <i>callback</i>>

<blockquote>
Creates and returns a callback function that writes all compressed
data to <i>stream</i>. It is defined like this:

<pre>
(defun make-stream-output-callback (stream)
  (lambda (buffer end)
    (write-sequence buffer stream :end end)))
</pre>
</blockquote>

<p><a name='gzip-stream'>[Function]</a><br>
<b>gzip-stream</b> <i>input-stream</i> <i>output-stream</i> => |

<blockquote>
Compresses all data read from <i>input-stream</i> and writes the
compressed dat