`sig
type extern_flags =
Marshal.extern_flags =
No_sharing
| Closures
| Compat_32
val output :
'b BatInnerIO.output -> ?sharing:bool -> ?closures:bool -> 'a -> 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 input : BatInnerIO.input -> 'a
val from_string : string -> int -> 'a
val header_size : int
val data_size : string -> int -> int
val total_size : string -> int -> int
val to_channel : 'b BatInnerIO.output -> 'a -> extern_flags list -> unit
val from_channel : BatInnerIO.input -> 'a
end`