diff options
Diffstat (limited to 'llex.c')
-rw-r--r-- | llex.c | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: llex.c,v 2.95 2015/11/19 19:16:22 roberto Exp roberto $ | 2 | ** $Id: llex.c,v 2.96 2016/05/02 14:02:12 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 | */ |
@@ -132,12 +132,12 @@ TString *luaX_newstring (LexState *ls, const char *str, size_t l) { | |||
132 | o = luaH_set(L, ls->h, L->top - 1); | 132 | o = luaH_set(L, ls->h, L->top - 1); |
133 | if (ttisnil(o)) { /* not in use yet? */ | 133 | if (ttisnil(o)) { /* not in use yet? */ |
134 | /* boolean value does not need GC barrier; | 134 | /* boolean value does not need GC barrier; |
135 | table has no metatable, so it does not need to invalidate cache */ | 135 | table is not a metatable, so it does not need to invalidate cache */ |
136 | setbvalue(o, 1); /* t[string] = true */ | 136 | setbvalue(o, 1); /* t[string] = true */ |
137 | luaC_checkGC(L); | 137 | luaC_checkGC(L); |
138 | } | 138 | } |
139 | else { /* string already present */ | 139 | else { /* string already present */ |
140 | ts = tsvalue(keyfromval(o)); /* re-use value previously stored */ | 140 | ts = keystrval(nodefromval(o)); /* re-use value previously stored */ |
141 | } | 141 | } |
142 | L->top--; /* remove string from stack */ | 142 | L->top--; /* remove string from stack */ |
143 | return ts; | 143 | return ts; |