val main: Lexing.lexbuf -> Parser.token

exception Lexical_error of string