diff --git a/zarr/src/codecs/bytes_to_bytes.ml b/zarr/src/codecs/bytes_to_bytes.ml index ec4cd83..c09e293 100644 --- a/zarr/src/codecs/bytes_to_bytes.ml +++ b/zarr/src/codecs/bytes_to_bytes.ml @@ -14,10 +14,13 @@ module GzipCodec = struct Error (Printf.sprintf "Invalid Gzip level %d" i) let encode l x = - Ezgzip.compress ~level:(to_int l) x + Bytes.Reader.to_string @@ + Bytesrw_zlib.Gzip.compress_reads ~level:(to_int l) () @@ + Bytes.Reader.of_string x let decode x = - Result.get_ok @@ Ezgzip.decompress x + Bytes.Reader.to_string @@ + Bytesrw_zlib.Gzip.decompress_reads () @@ Bytes.Reader.of_string x let to_yojson l = `Assoc diff --git a/zarr/src/dune b/zarr/src/dune index 88301b0..f7998cf 100644 --- a/zarr/src/dune +++ b/zarr/src/dune @@ -3,8 +3,8 @@ (public_name zarr) (libraries yojson - ezgzip bytesrw.zstd + bytesrw.zlib stdint checkseum) (ocamlopt_flags