RPAREN
{")", RPAREN, PAREN},
if (t_lex(*++t_wp) != RPAREN)
case RPAREN:
fprintf(traceout, "%c", RPAREN);