sig
  val match_frame : Str.regexp -> string -> int * int -> bool
  val match_whole : Str.regexp -> string -> bool
  val match_string : string -> string -> bool
end