sig
  val marshal_blit :
    ?flags:Marshal.extern_flags list ->
    'a -> ?pos:int -> ?len:int -> Bigstring.t -> int
  val marshal : ?flags:Marshal.extern_flags list -> 'a -> Bigstring.t
  val marshal_data_size : ?pos:int -> Bigstring.t -> int
  val unmarshal : ?pos:int -> Bigstring.t -> 'a
  val unmarshal_next : ?pos:int -> Bigstring.t -> 'a * int
  val skip : ?pos:int -> Bigstring.t -> int
  val marshal_to_fd :
    ?buf:Bigstring.t ->
    ?flags:Marshal.extern_flags list -> Unix.file_descr -> 'a -> unit
  val marshal_to_sock_no_sigpipe :
    (?buf:Bigstring.t ->
     ?flags:Marshal.extern_flags list -> Unix.file_descr -> 'a -> unit)
    Or_error.t
  val unmarshal_from_sock : ?buf:Bigstring.t -> Unix.file_descr -> 'a
end