diff options
Diffstat (limited to 'lapi.c')
-rw-r--r-- | lapi.c | 5 |
1 files changed, 3 insertions, 2 deletions
@@ -1217,12 +1217,13 @@ LUA_API int lua_gc (lua_State *L, int what, ...) { | |||
1217 | luaC_changemode(L, KGC_INC); | 1217 | luaC_changemode(L, KGC_INC); |
1218 | break; | 1218 | break; |
1219 | } | 1219 | } |
1220 | case LUA_GCSETPARAM: { | 1220 | case LUA_GCPARAM: { |
1221 | int param = va_arg(argp, int); | 1221 | int param = va_arg(argp, int); |
1222 | int value = va_arg(argp, int); | 1222 | int value = va_arg(argp, int); |
1223 | api_check(L, 0 <= param && param < LUA_GCPN, "invalid parameter"); | 1223 | api_check(L, 0 <= param && param < LUA_GCPN, "invalid parameter"); |
1224 | res = luaO_applyparam(g->gcparams[param], 100); | 1224 | res = luaO_applyparam(g->gcparams[param], 100); |
1225 | g->gcparams[param] = luaO_codeparam(value); | 1225 | if (value >= 0) |
1226 | g->gcparams[param] = luaO_codeparam(value); | ||
1226 | break; | 1227 | break; |
1227 | } | 1228 | } |
1228 | default: res = -1; /* invalid option */ | 1229 | default: res = -1; /* invalid option */ |