diff options
author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2017-04-20 15:22:44 -0300 |
---|---|---|
committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2017-04-20 15:22:44 -0300 |
commit | f748b4bb40bf94303d5cc609006054c0e9b7b2d7 (patch) | |
tree | 77f90ef8d22e59d9410223a69d2f4156796c9c3d /lapi.c | |
parent | 7ae180f8e8c987c1992ad95b3f5f31c69e5650e0 (diff) | |
download | lua-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.c | 11 |
1 files changed, 8 insertions, 3 deletions
@@ -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 | |||
1039 | LUA_API int lua_gc (lua_State *L, int what, int data) { | 1044 | LUA_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 | } |