common-lisp的解压库,zip中的解压部分(inflate.lisp)的实现,比deflate库慢大约4倍。
但是zip提供了完整的压缩、解压、文件操作的功能,defalte只具备解压功能(接口是输入、输出stream)。两个库不能直接替换。
可以将zip中inflate.lisp的实现,替换成如下方式,调用defalte.lisp的接口,以提升程序提升性能。
(in-package :zip)
(defun inflate (p op)
(deflate:inflate-stream p op))