;; 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 (data)
(let ((comp (salza2:compress-data
data
;; 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))