diff options
| author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2002-11-07 13:37:10 -0200 |
|---|---|---|
| committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2002-11-07 13:37:10 -0200 |
| commit | dff9be4224a1cd0f338b544b9e01d42f0f4e537f (patch) | |
| tree | 1dc8846da882dd37d9f420c10ea545ce92fb3b8a /lgc.c | |
| parent | 118347d8c3b83ea0291918e81c5367937316fabb (diff) | |
| download | lua-dff9be4224a1cd0f338b544b9e01d42f0f4e537f.tar.gz lua-dff9be4224a1cd0f338b544b9e01d42f0f4e537f.tar.bz2 lua-dff9be4224a1cd0f338b544b9e01d42f0f4e537f.zip | |
new macros to distinguish different types of object moves (for future GC
evolution).
Diffstat (limited to 'lgc.c')
| -rw-r--r-- | lgc.c | 4 |
1 files changed, 2 insertions, 2 deletions
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: lgc.c,v 1.153 2002/10/22 17:58:14 roberto Exp roberto $ | 2 | ** $Id: lgc.c,v 1.154 2002/10/25 20:05:28 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 | */ |
| @@ -344,7 +344,7 @@ static void checkSizes (lua_State *L) { | |||
| 344 | static void do1gcTM (lua_State *L, Udata *udata) { | 344 | static void do1gcTM (lua_State *L, Udata *udata) { |
| 345 | const TObject *tm = fasttm(L, udata->uv.metatable, TM_GC); | 345 | const TObject *tm = fasttm(L, udata->uv.metatable, TM_GC); |
| 346 | if (tm != NULL) { | 346 | if (tm != NULL) { |
| 347 | setobj(L->top, tm); | 347 | setobj2s(L->top, tm); |
| 348 | setuvalue(L->top+1, udata); | 348 | setuvalue(L->top+1, udata); |
| 349 | L->top += 2; | 349 | L->top += 2; |
| 350 | luaD_call(L, L->top - 2, 0); | 350 | luaD_call(L, L->top - 2, 0); |