Module Std.Glob

type pattern =
  1. | Wildwild
  2. | Exact of string
  3. | Regexp of Str.regexp
val compile_pattern : string -> pattern
val match_pattern : pattern -> string -> bool