sig
  type extern_flags = Marshal.extern_flags = No_sharing | Closures
  val to_channel : out_channel -> '-> extern_flags list -> unit
  external to_string : '-> extern_flags list -> string
    = "caml_output_value_to_string"
  val to_buffer : string -> int -> int -> '-> extern_flags list -> int
  val from_channel : in_channel -> 'a
  val from_string : string -> int -> 'a
  val header_size : int
  val data_size : string -> int -> int
  val total_size : string -> int -> int
end