aboutsummaryrefslogtreecommitdiff
path: root/lapi.c
diff options
context:
space:
mode:
authorRoberto Ierusalimschy <roberto@inf.puc-rio.br>2017-04-20 15:22:44 -0300
committerRoberto Ierusalimschy <roberto@inf.puc-rio.br>2017-04-20 15:22:44 -0300
commitf748b4bb40bf94303d5cc609006054c0e9b7b2d7 (patch)
tree77f90ef8d22e59d9410223a69d2f4156796c9c3d /lapi.c
parent7ae180f8e8c987c1992ad95b3f5f31c69e5650e0 (diff)
downloadlua-f748b4bb40bf94303d5cc609006054c0e9b7b2d7.tar.gz
lua-f748b4bb40bf94303d5cc609006054c0e9b7b2d7.tar.bz2
lua-f748b4bb40bf94303d5cc609006054c0e9b7b2d7.zip
macros to define default parameters for generational collection
Diffstat (limited to 'lapi.c')
-rw-r--r--lapi.c11
1 files changed, 8 insertions, 3 deletions
diff --git a/lapi.c b/lapi.c
index 9bd4a55b..29f3d265 100644
--- a/lapi.c
+++ b/lapi.c
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: lapi.c,v 2.262 2017/04/11 18:41:09 roberto Exp roberto $ 2** $Id: lapi.c,v 2.263 2017/04/19 17:02:50 roberto Exp roberto $
3** Lua API 3** Lua API
4** See Copyright Notice in lua.h 4** See Copyright Notice in lua.h
5*/ 5*/
@@ -1036,6 +1036,11 @@ LUA_API int lua_status (lua_State *L) {
1036** Garbage-collection function 1036** Garbage-collection function
1037*/ 1037*/
1038 1038
1039#if !defined(LUA_GENMAJORMUL)
1040#define LUA_GENMAJORMUL 100
1041#define LUA_GENMINORMUL 5
1042#endif
1043
1039LUA_API int lua_gc (lua_State *L, int what, int data) { 1044LUA_API int lua_gc (lua_State *L, int what, int data) {
1040 int res = 0; 1045 int res = 0;
1041 global_State *g; 1046 global_State *g;
@@ -1099,9 +1104,9 @@ LUA_API int lua_gc (lua_State *L, int what, int data) {
1099 } 1104 }
1100 case LUA_GCGEN: { 1105 case LUA_GCGEN: {
1101 lu_byte aux = data & 0xff; 1106 lu_byte aux = data & 0xff;
1102 g->genminormul = (aux == 0) ? 20 : aux; 1107 g->genminormul = (aux == 0) ? LUA_GENMINORMUL : aux;
1103 aux = (data >> 8) & 0xff; 1108 aux = (data >> 8) & 0xff;
1104 g->genmajormul = (aux == 0) ? 100 : aux; 1109 g->genmajormul = (aux == 0) ? LUA_GENMAJORMUL : aux;
1105 luaC_changemode(L, KGC_GEN); 1110 luaC_changemode(L, KGC_GEN);
1106 break; 1111 break;
1107 } 1112 }