open Little_syntax val token : Lexing.lexbuf -> token