weakregistry has its keys weak, too
This commit is contained in:
5
lstate.c
5
lstate.c
@@ -1,5 +1,5 @@
|
|||||||
/*
|
/*
|
||||||
** $Id: lstate.c,v 1.64 2001/06/12 18:43:13 roberto Exp roberto $
|
** $Id: lstate.c,v 1.65 2001/06/21 16:41:34 roberto Exp roberto $
|
||||||
** Global State
|
** Global State
|
||||||
** See Copyright Notice in lua.h
|
** See Copyright Notice in lua.h
|
||||||
*/
|
*/
|
||||||
@@ -67,7 +67,8 @@ static void f_luaopen (lua_State *L, void *ud) {
|
|||||||
G(L)->type2tag = luaH_new(L, 10);
|
G(L)->type2tag = luaH_new(L, 10);
|
||||||
G(L)->registry = luaH_new(L, 0);
|
G(L)->registry = luaH_new(L, 0);
|
||||||
G(L)->weakregistry = luaH_new(L, 0);
|
G(L)->weakregistry = luaH_new(L, 0);
|
||||||
G(L)->weakregistry->weakmode = LUA_WEAK_VALUE; /* make weakregistry weak */
|
/* make weakregistry weak */
|
||||||
|
G(L)->weakregistry->weakmode = LUA_WEAK_KEY | LUA_WEAK_VALUE;
|
||||||
luaS_resize(L, MINPOWER2);
|
luaS_resize(L, MINPOWER2);
|
||||||
luaX_init(L);
|
luaX_init(L);
|
||||||
luaT_init(L);
|
luaT_init(L);
|
||||||
|
|||||||
Reference in New Issue
Block a user