1
(* $Id: netcompression.mli 1610 2011-05-30 08:03:45Z gerd $ *)
3
(** Registry for compression algorithms *)
5
(** This registry is initially empty. The {!Netgzip} module can be used
6
to register the [gzip] algorithm, just run
13
val register : iana_name:string ->
14
?encoder:(unit -> Netchannels.io_obj_channel) ->
15
?decoder:(unit -> Netchannels.io_obj_channel) ->
17
(** Registers a compression algorithm. The algorithm is given as
18
a pair of functions returning {!Netchannels.io_obj_channel}.
21
val lookup_encoder : iana_name:string -> unit -> Netchannels.io_obj_channel
22
(** Returns the encoder, or raises [Not_found] *)
24
val lookup_decoder : iana_name:string -> unit -> Netchannels.io_obj_channel
25
(** Returns the decoder, or raises [Not_found] *)
27
val all_encoders : unit -> string list
28
val all_decoders : unit -> string list
29
(** The iana names of all encoders and decoders, resp. *)