aboutsummaryrefslogtreecommitdiff
path: root/lgc.c
diff options
context:
space:
mode:
Diffstat (limited to 'lgc.c')
-rw-r--r--lgc.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/lgc.c b/lgc.c
index 05991bd8..65182650 100644
--- a/lgc.c
+++ b/lgc.c
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: lgc.c,v 2.94 2010/05/10 18:23:45 roberto Exp roberto $ 2** $Id: lgc.c,v 2.95 2010/05/11 20:49:26 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*/
@@ -692,7 +692,7 @@ static void GCTM (lua_State *L, int propagateerrors) {
692 lu_byte oldah = L->allowhook; 692 lu_byte oldah = L->allowhook;
693 lu_mem oldd = g->GCdebt; 693 lu_mem oldd = g->GCdebt;
694 L->allowhook = 0; /* stop debug hooks during GC tag method */ 694 L->allowhook = 0; /* stop debug hooks during GC tag method */
695 g->GCdebt = -2 * g->totalbytes; /* avoid GC steps */ 695 stopgc(g); /* avoid GC steps */
696 setobj2s(L, L->top, tm); /* push finalizer... */ 696 setobj2s(L, L->top, tm); /* push finalizer... */
697 setuvalue(L, L->top+1, udata); /* ... and its argument */ 697 setuvalue(L, L->top+1, udata); /* ... and its argument */
698 L->top += 2; /* and (next line) call the finalizer */ 698 L->top += 2; /* and (next line) call the finalizer */