sig
type t = String of string | WString of int64 list
exception OutOfBounds
exception NotAscii of int64
val get_char : Format_string.t -> int -> char
val get_wchar : Format_string.t -> int -> int64
val sub_string : Format_string.t -> int -> int -> string
end