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
val ounit_tests : unit -> OUnit.test
end