1234567891011121314 |
- --- 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;
- }
-
|