sig type t val compile : ?cs:bool -> string -> Glob.t val exec : Glob.t -> string -> bool val quick : ?cs:bool -> string -> string -> bool val case_sensitive : Glob.t -> bool val escape : string -> string end