mirror of https://github.com/rusefi/lua.git
split to 'ugly.h'.
This commit is contained in:
parent
3386e3c1fb
commit
f84abc6799
31
lex.c
31
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;
|
||||
|
|
Loading…
Reference in New Issue