sig
  type bigstring = Bigstring.t
  module type S =
    sig
      type base
      type t
      val base : t -> base
      val pos : t -> int
      val length : t -> int
      val create : base -> pos:int -> len:int -> t
      val blit_to_string : t -> dst:string -> dst_pos:int -> unit
      val blit_to_bigstring : t -> dst:bigstring -> dst_pos:int -> unit
      val blit_from_string :
        t -> src:string -> src_pos:int -> len:int -> unit
      val blit_from_bigstring :
        t -> src:bigstring -> src_pos:int -> len:int -> unit
      val concat : t list -> t
      val concat_string : t list -> string
      val concat_bigstring : t list -> bigstring
      val of_bigstring : bigstring -> t
      val of_string : string -> t
      val to_bigstring : t -> bigstring
      val to_string : t -> string
      val drop_prefix : t -> int -> t
      val drop_suffix : t -> int -> t
      val prefix : t -> int -> t
      val suffix : t -> int -> t
    end
end