From e4645c835d2b2e49f0d39eb3069638f60da388cd Mon Sep 17 00:00:00 2001 From: Roberto Ierusalimschy Date: Sun, 13 Nov 1994 12:39:04 -0200 Subject: small changes in 'ugly' part. --- lex.c | 29 ++++++++++++----------------- 1 file changed, 12 insertions(+), 17 deletions(-) (limited to 'lex.c') diff --git a/lex.c b/lex.c index 55bb08f6..7aad1d0d 100644 --- a/lex.c +++ b/lex.c @@ -1,4 +1,4 @@ -char *rcs_lex = "$Id: lex.c,v 2.8 1994/10/18 17:34:34 celes Exp roberto $"; +char *rcs_lex = "$Id: lex.c,v 2.9 1994/11/03 17:09:20 roberto Exp roberto $"; #include @@ -246,22 +246,17 @@ fraction: yylval.vFloat = a; return NUMBER; } - case U_and: next(); return AND; - case U_do: next(); return DO; - case U_else: next(); return ELSE; - case U_elseif: next(); return ELSEIF; - case U_end: next(); return END; - case U_function: next(); return FUNCTION; - case U_if: next(); return IF; - case U_local: next(); return LOCAL; - case U_nil: next(); return NIL; - case U_not: next(); return NOT; - case U_or: next(); return OR; - case U_repeat: next(); return REPEAT; - case U_return: next(); return RETURN; - case U_then: next(); return THEN; - case U_until: next(); return UNTIL; - case U_while: next(); return WHILE; + + case U_and: case U_do: case U_else: case U_elseif: case U_end: + case U_function: case U_if: case U_local: case U_nil: case U_not: + case U_or: case U_repeat: case U_return: case U_then: + case U_until: case U_while: + { + int old = current; + next(); + return reserved[old-U_and].token; + } + case U_eq: next(); return EQ; case U_le: next(); return LE; case U_ge: next(); return GE; -- cgit v1.2.3-55-g6feb