blob: 3c78525b0b2f41187004219536463bad024ba692 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
--- lua-5.1.4.orig/src/llex.c 2007/12/28 15:32:23 2.63.1.3
+++ lua-5.1.4/src/llex.c 2010/02/23 12:36:59
@@ -118,8 +118,10 @@
lua_State *L = ls->L;
TString *ts = luaS_newlstr(L, str, l);
TValue *o = luaH_setstr(L, ls->fs->h, ts); /* entry for `str' */
- if (ttisnil(o))
+ if (ttisnil(o)) {
setbvalue(o, 1); /* make sure `str' will not be collected */
+ luaC_checkGC(L);
+ }
return ts;
}
|
