option to return GC to normal (incremental, non generational) mode

1 files changed, 5 insertions, 1 deletions

diff --git a/lapi.c b/lapi.c
index 4a96b9a4..7a91185a 100644
--- a/lapi.c
+++ b/lapi.c
@@ -1,5 +1,5 @@
 /*
-** $Id: lapi.c,v 2.117 2010/03/26 20:58:11 roberto Exp roberto $
+** $Id: lapi.c,v 2.118 2010/03/29 17:43:14 roberto Exp roberto $
 ** Lua API
 ** See Copyright Notice in lua.h
 */
@@ -952,6 +952,10 @@ LUA_API int lua_gc (lua_State *L, int what, int data) {
       g->gckind = KGC_GEN;
       break;
     }
+    case LUA_GCINC: {  /* change collector to incremental mode */
+      g->gckind = KGC_NORMAL;
+      break;
+    }
     default: res = -1;  /* invalid option */
   }
   lua_unlock(L);