type token =
  | ID of (
# 3 "src/parser.mly"
        string
# 6 "src/parser.mli"
)
  | IDPLUS of (
# 4 "src/parser.mly"
        string
# 11 "src/parser.mli"
)
  | REF of (
# 5 "src/parser.mly"
        string option * string
# 16 "src/parser.mli"
)
  | ADREF of (
# 6 "src/parser.mly"
        string option * string
# 21 "src/parser.mli"
)
  | WITH
  | AND
  | OR
  | LPAREN
  | RPAREN
  | EOF

val main :
  (Lexing.lexbuf  -> token) -> Lexing.lexbuf -> Types.t
