(* Copyright (C) 2007 Mauricio Fernandez <mfp@acm.org> http//eigenclass.org
 * See README.txt and LICENSE for the redistribution and modification terms *)

type bigstring_t

val map_file : Unix.file_descr -> ?pos:int64 -> ?shared:bool -> int -> bigstring_t
val length : bigstring_t -> int
val get : bigstring_t -> int -> char
val set : bigstring_t -> int -> char -> unit
val unsafe_get : bigstring_t -> int -> char
val unsafe_set : bigstring_t -> int -> char -> unit

module String : sig
  type t
  val unsafe_get : t -> int -> char
  val unsafe_set : t -> int -> char -> unit
end

val unsafe_string : bigstring_t -> String.t

module BM_search : sig
  type t
  val make : string -> t
  val find : t -> bigstring_t -> int -> int
  val find_end : t -> bigstring_t -> int -> int
end