sig
  type bigstring =
      (char, Bigarray.int8_unsigned_elt, Bigarray.c_layout) Bigarray.Array1.t
  module type S = Bin_prot.Binable.S
  module type S1 = Bin_prot.Binable.S1
  module type S2 = Bin_prot.Binable.S2
  module Of_stringable :
    functor (M : Stringable.S) ->
      sig
        val bin_size_t : M.t Bin_prot.Size.sizer
        val bin_write_t : M.t Bin_prot.Map_to_safe.writer
        val bin_write_t_ : M.t Bin_prot.Unsafe_write_c.writer
        val bin_read_t : M.t Bin_prot.Read_ml.reader
        val bin_read_t_ : M.t Bin_prot.Unsafe_read_c.reader
        val bin_read_t__ : (int -> M.t) Bin_prot.Unsafe_read_c.reader
        val bin_writer_t : M.t Bin_prot.Type_class.writer
        val bin_reader_t : M.t Bin_prot.Type_class.reader
        val bin_t : M.t Bin_prot.Type_class.t
      end
  type 'a m = (module S with type t = 'a)
  val of_bigstring : 'a m -> bigstring -> 'a
  val to_bigstring : ?prefix_with_length:bool -> 'a m -> 'a -> bigstring
  val of_string : 'a m -> string -> 'a
  val to_string : 'a m -> 'a -> string
end