[zip-devel] Patch for LispWorks

[David Lichteblau]

Quoting Edi Weitz (edi at agharta.de):
> Attached is a patch for the LW (and obviously also SBCL) Gray stream
> code.  Did this ever work?

No, it didn't.  The gray stream port was very much a quick portability
hack.  Sorry about that.  :-(

> -  (replace (buf stream)
> +  (replace (buf stream) seq

I had foolishly changed a while ago without reviewing it properly.  In
addition to the bogus call to replace, (pos streams) needs to be
advanced, otherwise the extracted file will be corrupted on the second
write.

The correct patch is now in CVS and works for me (yes, I'm now actually
using my own library again...).


d.