From 1bb407e494072b2fb05efcf53af3eb100abe981d Mon Sep 17 00:00:00 2001
From: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date: Mon, 19 Apr 2010 13:33:19 -0300
Subject: in lua_gc/step, 'luaC_step' changes GCthreshold, so there was little
 control over the real step size.

---
 lapi.c | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

(limited to 'lapi.c')

diff --git a/lapi.c b/lapi.c
index b56f8c85..39934790 100644
--- a/lapi.c
+++ b/lapi.c
@@ -1,5 +1,5 @@
 /*
-** $Id: lapi.c,v 2.121 2010/04/13 20:48:12 roberto Exp roberto $
+** $Id: lapi.c,v 2.122 2010/04/18 13:22:48 roberto Exp roberto $
 ** Lua API
 ** See Copyright Notice in lua.h
 */
@@ -940,9 +940,7 @@ LUA_API int lua_gc (lua_State *L, int what, int data) {
         luaC_step(L);  /* do a single step */
       }
       else {
-        lu_mem a = (cast(lu_mem, data) << 10);
-        g->GCthreshold = (a <= g->totalbytes) ? g->totalbytes - a : 0;
-        while (g->GCthreshold <= g->totalbytes) {
+        while (data-- >= 0) {
           luaC_step(L);
           if (g->gcstate == GCSpause) {  /* end of cycle? */
             res = 1;  /* signal it */
-- 
cgit v1.2.3-55-g6feb