|
@@ -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
|
|
|
** 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 */
|
|
|
setsvalue2s(L, L->top++, ts); /* temporarily anchor it in stack */
|
|
|
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 */
|
|
|
luaC_checkGC(L);
|
|
|
}
|