Zstd.Compress
type t = cctx
val create : ?level:int -> unit -> cctx
val destroy : cctx -> unit
val compress_stream : ?output_size:int -> ?finish:bool -> cctx -> string -> compress_status * int * string * bool
val with_cctx : ?level:int -> (cctx -> 'a) -> 'a