commit 281db390e8c8bdb8423a21728a2d4ac703ac3f33
parent df8cf53cc95ed9620c7716bda287d6a602a3168e
Author: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date: Thu, 14 Mar 1996 12:17:08 -0300
no more "ugly" programs.
no more comments with '#'.
Diffstat:
M | lex.c | | | 25 | ++----------------------- |
1 file changed, 2 insertions(+), 23 deletions(-)
diff --git a/lex.c b/lex.c
@@ -1,4 +1,4 @@
-char *rcs_lex = "$Id: lex.c,v 2.28 1996/02/14 19:11:09 roberto Exp roberto $";
+char *rcs_lex = "$Id: lex.c,v 2.29 1996/02/26 22:35:51 roberto Exp roberto $";
#include <ctype.h>
@@ -12,7 +12,6 @@ char *rcs_lex = "$Id: lex.c,v 2.28 1996/02/14 19:11:09 roberto Exp roberto $";
#include "inout.h"
#include "luadebug.h"
#include "parser.h"
-#include "ugly.h"
#define MINBUFF 260
@@ -143,9 +142,6 @@ int luaY_lex (void)
while (1)
{
yytextLast = yytext;
-#if 0
- fprintf(stderr,"'%c' %d\n",current,current);
-#endif
switch (current)
{
case EOF:
@@ -177,8 +173,7 @@ int luaY_lex (void)
case '-':
save_and_next();
- if (current != '-') return '-'; /* else goes through */
- case '#':
+ if (current != '-') return '-';
do { next(); } while (current != '\n' && current != 0);
continue;
@@ -323,22 +318,6 @@ fraction:
return NUMBER;
}
- 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;
- case U_ne: next(); return NE;
- case U_sc: next(); return CONC;
-
default: /* also end of file */
{
save_and_next();