Module Glob_lexer

module Glob_lexer: sig .. end

type token =

`\|`	`ATOM of Glob_ast.pattern Glob_ast.atom`
`\|`	`AND`
`\|`	`OR`
`\|`	`NOT`
`\|`	`LPAR`
`\|`	`RPAR`
`\|`	`TRUE`
`\|`	`FALSE`
`\|`	`EOF`

val sf : ('a, unit, string) Pervasives.format -> 'a

val concat_patterns : Glob_ast.pattern -> Glob_ast.pattern -> Glob_ast.pattern

val slash : Glob_ast.pattern

val not_slash : Glob_ast.pattern

val any : Glob_ast.pattern

val __ocaml_lex_tables : Lexing.lex_tables

val token : Lexing.lexbuf -> token

val __ocaml_lex_token_rec : Lexing.lexbuf -> int -> token

val parse_pattern : char list -> Glob_ast.pattern -> Lexing.lexbuf -> Glob_ast.pattern * char

val __ocaml_lex_parse_pattern_rec : char list ->
       Glob_ast.pattern -> Lexing.lexbuf -> int -> Glob_ast.pattern * char

val parse_string : Buffer.t -> Lexing.lexbuf -> string

val __ocaml_lex_parse_string_rec : Buffer.t -> Lexing.lexbuf -> int -> string

val parse_class : (char * char) Bool.boolean list ->
       Lexing.lexbuf -> (char * char) Bool.boolean list

val __ocaml_lex_parse_class_rec : (char * char) Bool.boolean list ->
       Lexing.lexbuf -> int -> (char * char) Bool.boolean list