mirrors
/
lua
mirror of https://github.com/lua/lua
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

only need to reset buffer for strings, numbers, and names.

This commit is contained in:
Roberto Ierusalimschy 2000-01-26 16:51:49 -02:00
parent d83c2a8455
commit d6b9f49aaf
1 changed files with 7 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
llex.c
View File

@ -1,5 +1,5 @@
/*
** $Id: llex.c,v 1.48 1999/12/30 12:40:29 roberto Exp roberto $
** $Id: llex.c,v 1.49 2000/01/25 18:44:21 roberto Exp roberto $
** Lexical Analyzer
** See Copyright Notice in lua.h
*/
@ -321,7 +321,6 @@ static void read_string (lua_State *L, LexState *LS, int del) {
int luaX_lex (LexState *LS) {
lua_State *L = LS->L;
luaL_resetbuffer(L);
for (;;) {
switch (LS->current) {
@ -340,6 +339,7 @@ int luaX_lex (LexState *LS) {
continue;
case '[':
luaL_resetbuffer(L);
save_and_next(L, LS);
if (LS->current != '[') return '[';
else {
@ -370,10 +370,12 @@ int luaX_lex (LexState *LS) {
case '"':
case '\'':
luaL_resetbuffer(L);
read_string(L, LS, LS->current);
return STRING;
case '.':
luaL_resetbuffer(L);
save_and_next(L, LS);
if (LS->current == '.') {
next(LS);
@ -384,10 +386,11 @@ int luaX_lex (LexState *LS) {
else return CONC; /* .. */
}
else if (!isdigit(LS->current)) return '.';
goto fraction; /* LS->current is a digit: goes through to number */
else goto fraction; /* LS->current is a digit */
case '0': case '1': case '2': case '3': case '4':
case '5': case '6': case '7': case '8': case '9':
luaL_resetbuffer(L);
do {
save_and_next(L, LS);
} while (isdigit(LS->current));
@ -431,6 +434,7 @@ int luaX_lex (LexState *LS) {
}
tname: { /* identifier or reserved word */
TaggedString *ts;
luaL_resetbuffer(L);
do {
save_and_next(L, LS);
} while (isalnum(LS->current) || LS->current == '_');