summaryrefslogtreecommitdiff
path: root/apps/plugins/lua/llex.c
diff options
context:
space:
mode:
Diffstat (limited to 'apps/plugins/lua/llex.c')
-rw-r--r--apps/plugins/lua/llex.c6
1 files changed, 4 insertions, 2 deletions
diff --git a/apps/plugins/lua/llex.c b/apps/plugins/lua/llex.c
index 85ac516be3..6f78d48983 100644
--- a/apps/plugins/lua/llex.c
+++ b/apps/plugins/lua/llex.c
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: llex.c,v 2.20.1.1 2007/12/27 13:02:25 roberto Exp $ 2** $Id: llex.c,v 2.20.1.2 2009/11/23 14:58:22 roberto Exp $
3** Lexical Analyzer 3** Lexical Analyzer
4** See Copyright Notice in lua.h 4** See Copyright Notice in lua.h
5*/ 5*/
@@ -118,8 +118,10 @@ TString *luaX_newstring (LexState *ls, const char *str, size_t l) {
118 lua_State *L = ls->L; 118 lua_State *L = ls->L;
119 TString *ts = luaS_newlstr(L, str, l); 119 TString *ts = luaS_newlstr(L, str, l);
120 TValue *o = luaH_setstr(L, ls->fs->h, ts); /* entry for `str' */ 120 TValue *o = luaH_setstr(L, ls->fs->h, ts); /* entry for `str' */
121 if (ttisnil(o)) 121 if (ttisnil(o)) {
122 setbvalue(o, 1); /* make sure `str' will not be collected */ 122 setbvalue(o, 1); /* make sure `str' will not be collected */
123 luaC_checkGC(L);
124 }
123 return ts; 125 return ts;
124} 126}
125 127