cl-bzip2是CommoLisp实现bzip2压缩和解压缩的开发包。
压缩示例代码：
;;;Compressiousage;;;Novaluesarereturedifexecutiowassuccessful;;;UsigpathamesCL-USER>(bzip2:compress#p"test.txt"#p"test.txt.bz2");Novalue;;;UsigbiarystreamsCL-USER>(with-ope-file(i"test.txt":directio:iput:elemet-type'(usiged-byte8))(with-ope-file(out"test.txt.bz2":directio:output:elemet-type'(usiged-byte8))(bzip2:compressiout)));Novalue;;;MixigstreamadpathameCL-USER>(with-ope-file(i"test.txt":directio:iput:elemet-type'(usiged-byte8))(bzip2:compressi#p"test.txt.bz2"));Novalue
评论