lexi
type_code = lexi(&ps); /* lexi reads one token. The actual
type_code = lexi(&transient_state); /* read another token */
int lexi(struct parser_state *);