|
|
|
@ -868,7 +868,6 @@ static void freeLclosure (lua_State *L, LClosure *cl) {
|
|
|
|
|
luaM_freemem(L, cl, sizeLclosure(cl->nupvalues));
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
static void freeobj(lua_State *L, GCObject *o) {
|
|
|
|
|
switch (o->tt) {
|
|
|
|
|
case LUA_TPROTO:
|
|
|
|
@ -902,11 +901,11 @@ static void freeobj (lua_State *L, GCObject *o) {
|
|
|
|
|
case LUA_TLNGSTR:
|
|
|
|
|
luaM_freemem(L, o, sizelstring(gco2ts(o)->u.lnglen));
|
|
|
|
|
break;
|
|
|
|
|
default: lua_assert(0);
|
|
|
|
|
default:
|
|
|
|
|
lua_assert(0);
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
|
** sweep at most 'countin' elements from a list of GCObjects erasing dead
|
|
|
|
|
** objects, where a dead object is one marked with the old (non current)
|
|
|
|
|