nik/lush
1
1
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

comment

Browse Source
This commit is contained in:
Roberto Ierusalimschy
2011-08-11 14:06:12 -03:00
parent 92afcf2823
commit ea46b750dc
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
llex.c
View File

@@ -1,5 +1,5 @@
/* /*
** $Id: llex.c,v 2.55 2011/07/15 12:48:03 roberto Exp roberto $ ** $Id: llex.c,v 2.56 2011/08/09 20:58:29 roberto Exp roberto $
** Lexical Analyzer ** Lexical Analyzer
** See Copyright Notice in lua.h ** See Copyright Notice in lua.h
*/ */
@@ -127,7 +127,7 @@ TString *luaX_newstring (LexState *ls, const char *str, size_t l) {
TString *ts = luaS_newlstr(L, str, l); /* create new string */ TString *ts = luaS_newlstr(L, str, l); /* create new string */
setsvalue2s(L, L->top++, ts); /* temporarily anchor it in stack */ setsvalue2s(L, L->top++, ts); /* temporarily anchor it in stack */
o = luaH_set(L, ls->fs->h, L->top - 1); o = luaH_set(L, ls->fs->h, L->top - 1);
if (ttisnil(o)) { if (ttisnil(o)) { /* not in use yet? (see 'addK') */
setbvalue(o, 1); /* t[string] = true */ setbvalue(o, 1); /* t[string] = true */
luaC_checkGC(L); luaC_checkGC(L);
} }