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