common lisp: deflate 比 zip库中的inflate性能高大约4倍

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))


你可能感兴趣的:(zip,lisp,common,deflate)