1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
|
(**************************************************************************)
(* *)
(* OCaml *)
(* *)
(* Xavier Leroy, Collège de France and Inria project Cambium *)
(* *)
(* Copyright 2023 Institut National de Recherche en Informatique et *)
(* en Automatique. *)
(* *)
(* All rights reserved. This file is distributed under the terms of *)
(* the GNU Lesser General Public License version 2.1, with the *)
(* special exception on linking described in the file LICENSE. *)
(* *)
(**************************************************************************)
val output_value : out_channel -> 'a -> unit
(** [Compression.output_value chan v] writes the representation
of [v] on channel [chan].
If compression is supported, the marshaled data
representing value [v] is compressed before being written to
channel [chan].
If compression is not supported, this function behaves like
{!Stdlib.output_value}. *)
val input_value : in_channel -> 'a
(** [Compression.input_value chan] reads from channel [chan] the
byte representation of a structured value, as produced by
[Compression.output_value], and reconstructs and
returns the corresponding value.
If compression is not supported, this function behaves like
{!Stdlib.input_value}. *)
val compression_supported : bool
(** Reports whether compression is supported. *)
|
