sig
  type extern_flags = Marshal.extern_flags = No_sharing | Closures
  val to_channel : out_channel -> 'a -> extern_flags list -> unit
  external to_string : 'a -> extern_flags list -> string
    = "caml_output_value_to_string"
  val to_buffer : string -> int -> int -> 'a -> 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
  val output :
    'a BatInnerIO.output -> ?sharing:bool -> ?closures:bool -> 'b -> unit
  val input : BatInnerIO.input -> 'a
  val to_channel :
    'a BatInnerIO.output -> 'b -> Marshal.extern_flags list -> unit
  val from_channel : BatInnerIO.input -> 'a
end