src/utils/cdk/bzlib.mli

   1
   2 type bzlib_error = BZ_CONFIG_ERROR | BZ_SEQUENCE_ERROR | BZ_PARAM_ERROR | BZ_MEM_ERROR | BZ_DATA_ERROR | BZ_DATA_ERROR_MAGIC | BZ_UNKNOWN_ERROR
   3 exception Error of string * bzlib_error
   4
   5 val string_of_error: bzlib_error -> string
   6
   7 type stream
   8
   9 type action = BZ_RUN | BZ_FLUSH | BZ_FINISH
  10
  11 external compress_init: int -> int -> int -> stream = "camlzip_bzCompressInit"
  12 external compress:
  13   stream -> string -> int -> int -> bytes -> int -> int -> action
  14          -> bool * int * int
  15   = "camlzip_bzCompress_bytecode" "camlzip_bzCompress"
  16 external compress_end: stream -> unit = "camlzip_bzCompressEnd"
  17
  18
  19 external decompress_init: int -> bool -> stream = "camlzip_bzDecompressInit"
  20 external decompress:
  21   stream -> string -> int -> int -> bytes -> int -> int -> bool * int * int
  22   = "camlzip_bzDecompress_bytecode" "camlzip_bzDecompress"
  23 external decompress_end: stream -> unit = "camlzip_bzDecompressEnd"
  24
  25 external bzlib_version : unit -> string = "camlzip_bzlibversion"