sig
  type t = bytes array
  val create : int -> Misc.LongString.t
  val length : Misc.LongString.t -> int
  val get : Misc.LongString.t -> int -> char
  val set : Misc.LongString.t -> int -> char -> unit
  val blit :
    Misc.LongString.t -> int -> Misc.LongString.t -> int -> int -> unit
  val output :
    Pervasives.out_channel -> Misc.LongString.t -> int -> int -> unit
  val unsafe_blit_to_bytes :
    Misc.LongString.t -> int -> bytes -> int -> int -> unit
  val input_bytes : Pervasives.in_channel -> int -> Misc.LongString.t
end