summaryrefslogtreecommitdiff
path: root/src/yacc/lua.lex
diff options
context:
space:
mode:
authorLua Team <team@lua.org>1995-02-07 12:00:00 +0000
committerrepogen <>1995-02-07 12:00:00 +0000
commita8b6ba0954edb9e0e669e1f451b9a8f145ce5166 (patch)
tree35e9e9999968c4f13a25a5f647203456f044274a /src/yacc/lua.lex
parent944fc7d7d95575f2b8023c1f3d4ac19e1369fc76 (diff)
downloadlua-github-2.1.tar.gz
Lua 2.12.1
Diffstat (limited to 'src/yacc/lua.lex')
-rw-r--r--src/yacc/lua.lex85
1 files changed, 0 insertions, 85 deletions
diff --git a/src/yacc/lua.lex b/src/yacc/lua.lex
deleted file mode 100644
index cbb0232a..00000000
--- a/src/yacc/lua.lex
+++ /dev/null
@@ -1,85 +0,0 @@
-%{
-
-char *rcs_lualex = "$Id: lua.lex,v 1.1 1993/12/17 18:53:41 celes Exp $";
-
-#include <stdlib.h>
-#include <string.h>
-
-#include "opcode.h"
-#include "hash.h"
-#include "inout.h"
-#include "table.h"
-#include "y.tab.h"
-
-#undef input
-#undef unput
-
-static Input input;
-static Unput unput;
-
-void lua_setinput (Input fn)
-{
- input = fn;
-}
-
-void lua_setunput (Unput fn)
-{
- unput = fn;
-}
-
-char *lua_lasttext (void)
-{
- return yytext;
-}
-
-%}
-
-
-%%
-[ \t]* ;
-^"$debug" {yylval.vInt = 1; return DEBUG;}
-^"$nodebug" {yylval.vInt = 0; return DEBUG;}
-\n lua_linenumber++;
-"--".* ;
-"local" return LOCAL;
-"if" return IF;
-"then" return THEN;
-"else" return ELSE;
-"elseif" return ELSEIF;
-"while" return WHILE;
-"do" return DO;
-"repeat" return REPEAT;
-"until" return UNTIL;
-"function" {
- yylval.vWord = lua_nfile-1;
- return FUNCTION;
- }
-"end" return END;
-"return" return RETURN;
-"local" return LOCAL;
-"nil" return NIL;
-"and" return AND;
-"or" return OR;
-"not" return NOT;
-"~=" return NE;
-"<=" return LE;
-">=" return GE;
-".." return CONC;
-\"[^\"]*\" |
-\'[^\']*\' {
- yylval.vWord = lua_findenclosedconstant (yytext);
- return STRING;
- }
-[0-9]+("."[0-9]*)? |
-([0-9]+)?"."[0-9]+ |
-[0-9]+("."[0-9]*)?[dDeEgG][+-]?[0-9]+ |
-([0-9]+)?"."[0-9]+[dDeEgG][+-]?[0-9]+ {
- yylval.vFloat = atof(yytext);
- return NUMBER;
- }
-[a-zA-Z_][a-zA-Z0-9_]* {
- yylval.vWord = lua_findsymbol (yytext);
- return NAME;
- }
-. return *yytext;
-