lua

A copy of the Lua development repository
Log | Files | Refs | README

commit f84abc6799b9e58244480527386f78560ee2feb2
parent 3386e3c1fba2a829fdf5987edce2a501d6379a5a
Author: Waldemar Celes <celes@tecgraf.puc-rio.br>
Date:   Tue, 18 Oct 1994 15:34:15 -0200

split to 'ugly.h'.

Diffstat:
Mlex.c | 31+++++++------------------------
1 file changed, 7 insertions(+), 24 deletions(-)

diff --git 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):(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;