Testo_util.Tag_query_parser
type token =
| TAG of Tag.t
| AND
| OR
| NOT
| ALL
| NONE
| LPAREN
| RPAREN
| EOF
val main : (Stdlib.Lexing.lexbuf -> token) -> Stdlib.Lexing.lexbuf -> Tag.query