diff options
| -rw-r--r-- | lgc.c | 6 |
1 files changed, 1 insertions, 5 deletions
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: lgc.c,v 2.34 2005/06/07 18:53:45 roberto Exp roberto $ | 2 | ** $Id: lgc.c,v 2.35 2005/08/04 13:37:38 roberto Exp roberto $ |
| 3 | ** Garbage Collector | 3 | ** Garbage Collector |
| 4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
| 5 | */ | 5 | */ |
| @@ -287,7 +287,6 @@ static l_mem propagatemark (global_State *g) { | |||
| 287 | black2gray(o); /* keep it gray */ | 287 | black2gray(o); /* keep it gray */ |
| 288 | return sizeof(Table) + sizeof(TValue) * h->sizearray + | 288 | return sizeof(Table) + sizeof(TValue) * h->sizearray + |
| 289 | sizeof(Node) * sizenode(h); | 289 | sizeof(Node) * sizenode(h); |
| 290 | break; | ||
| 291 | } | 290 | } |
| 292 | case LUA_TFUNCTION: { | 291 | case LUA_TFUNCTION: { |
| 293 | Closure *cl = gco2cl(o); | 292 | Closure *cl = gco2cl(o); |
| @@ -295,7 +294,6 @@ static l_mem propagatemark (global_State *g) { | |||
| 295 | traverseclosure(g, cl); | 294 | traverseclosure(g, cl); |
| 296 | return (cl->c.isC) ? sizeCclosure(cl->c.nupvalues) : | 295 | return (cl->c.isC) ? sizeCclosure(cl->c.nupvalues) : |
| 297 | sizeLclosure(cl->l.nupvalues); | 296 | sizeLclosure(cl->l.nupvalues); |
| 298 | break; | ||
| 299 | } | 297 | } |
| 300 | case LUA_TTHREAD: { | 298 | case LUA_TTHREAD: { |
| 301 | lua_State *th = gco2th(o); | 299 | lua_State *th = gco2th(o); |
| @@ -306,7 +304,6 @@ static l_mem propagatemark (global_State *g) { | |||
| 306 | traversestack(g, th); | 304 | traversestack(g, th); |
| 307 | return sizeof(lua_State) + sizeof(TValue) * th->stacksize + | 305 | return sizeof(lua_State) + sizeof(TValue) * th->stacksize + |
| 308 | sizeof(CallInfo) * th->size_ci; | 306 | sizeof(CallInfo) * th->size_ci; |
| 309 | break; | ||
| 310 | } | 307 | } |
| 311 | case LUA_TPROTO: { | 308 | case LUA_TPROTO: { |
| 312 | Proto *p = gco2p(o); | 309 | Proto *p = gco2p(o); |
| @@ -318,7 +315,6 @@ static l_mem propagatemark (global_State *g) { | |||
| 318 | sizeof(int) * p->sizelineinfo + | 315 | sizeof(int) * p->sizelineinfo + |
| 319 | sizeof(LocVar) * p->sizelocvars + | 316 | sizeof(LocVar) * p->sizelocvars + |
| 320 | sizeof(TString *) * p->sizeupvalues; | 317 | sizeof(TString *) * p->sizeupvalues; |
| 321 | break; | ||
| 322 | } | 318 | } |
| 323 | default: lua_assert(0); return 0; | 319 | default: lua_assert(0); return 0; |
| 324 | } | 320 | } |
