From f84abc6799b9e58244480527386f78560ee2feb2 Mon Sep 17 00:00:00 2001 From: Waldemar Celes Date: Tue, 18 Oct 1994 15:34:34 -0200 Subject: split to 'ugly.h'. --- lex.c | 31 +++++++------------------------ 1 file changed, 7 insertions(+), 24 deletions(-) diff --git a/lex.c b/lex.c index 060fa302..083980fc 100644 --- a/lex.c +++ b/lex.c @@ -1,5 +1,9 @@ -char *rcs_lex = "$Id: lex.c,v 2.6 1994/09/26 16:21:52 celes Exp celes $"; +char *rcs_lex = "$Id: lex.c,v 2.7 1994/10/17 19:01:53 celes Exp celes $"; /*$Log: lex.c,v $ + * Revision 2.7 1994/10/17 19:01:53 celes + * new algorithm for reading floats. + * files end with EOF, instead of 0. + * * Revision 2.6 1994/09/26 16:21:52 celes * Mudancas para tornar lex.c um modulo independente dos outros * modulos de Lua @@ -41,6 +45,7 @@ char *rcs_lex = "$Id: lex.c,v 2.6 1994/09/26 16:21:52 celes Exp celes $"; #include "opcode.h" #include "inout.h" #include "y.tab.h" +#include "ugly.h" #define lua_strcmp(a,b) (a[0]b[0]?(1):strcmp(a,b))) @@ -91,29 +96,6 @@ static struct {"until", UNTIL}, {"while", WHILE} }; -enum -{ - U_and=128, - U_do, - U_else, - U_elseif, - U_end, - U_function, - U_if, - U_local, - U_nil, - U_not, - U_or, - U_repeat, - U_return, - U_then, - U_until, - U_while, - U_le = '<'+128, - U_ge = '>'+128, - U_ne = '~'+128, - U_sc = '.'+128 -}; #define RESERVEDSIZE (sizeof(reserved)/sizeof(reserved[0])) @@ -315,6 +297,7 @@ fraction: case U_then: next(); return THEN; case U_until: next(); return UNTIL; case U_while: next(); return WHILE; + case U_eq: next(); return EQ; case U_le: next(); return LE; case U_ge: next(); return GE; case U_ne: next(); return NE; -- cgit v1.2.3-55-g6feb