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 Binable.S with type t = 'a)
  val of_bigstring : 'a Binable.m -> Binable.bigstring -> 'a
  val to_bigstring :
    ?prefix_with_length:bool -> 'a Binable.m -> 'a -> Binable.bigstring
  val of_string : 'a Binable.m -> string -> 'a
  val to_string : 'a Binable.m -> 'a -> string
end