X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=src%2Fcompress.lisp;h=a6a7ee91c5a90b5021e815a5073dac6172f79250;hb=cd1441d57a0548fec1468b911c9e8c61c1337299;hp=172ff6d435fbc56743fcc61bb50300db8cf03e03;hpb=91a4befe34e15ab6c4c74901b3a16ec370c5de02;p=memstore.git

diff --git a/src/compress.lisp b/src/compress.lisp
index 172ff6d..a6a7ee9 100644
--- a/src/compress.lisp
+++ b/src/compress.lisp
@@ -14,9 +14,8 @@
 ;; KMR: zlib gives compression errors on random tests:
 ;;    indices outside of input array size
 ;; Using salza2 as default compressor
-
-(defun compress-zlib (data)
-  (zlib:compress data :fixed))
+;;(defun compress-zlib (data)
+;;  (zlib:compress data :fixed))
 
 (defun compress (data)
   (let ((comp (salza2:compress-data
@@ -26,8 +25,9 @@
 
 ;; KMR: zlib appears to works fine with salza2 zlib compressor, but
 ;; moving to chipz as default decompressor as appears better supported
-(defun uncompress-zlib (data)
-  (zlib:uncompress data))
+
+;;(defun uncompress-zlib (data)
+;;  (zlib:uncompress data))
 
 (defun uncompress (data)
   (chipz:decompress nil 'chipz:zlib data))