浏览代码

in 'luaL_checkstack', include extra stack space in test to allow
correct execution of error routines, if necessary

Roberto Ierusalimschy 13 年之前
父节点
当前提交
eda87f1156
共有 1 个文件被更改,包括 4 次插入2 次删除
  1. 4 2
      lauxlib.c

+ 4 - 2
lauxlib.c

@@ -1,5 +1,5 @@
 /*
-** $Id: lauxlib.c,v 1.233 2011/06/16 14:11:04 roberto Exp roberto $
+** $Id: lauxlib.c,v 1.234 2011/07/25 17:18:49 roberto Exp roberto $
 ** Auxiliary functions for building Lua libraries
 ** See Copyright Notice in lua.h
 */
@@ -330,7 +330,9 @@ LUALIB_API int luaL_checkoption (lua_State *L, int narg, const char *def,
 
 
 LUALIB_API void luaL_checkstack (lua_State *L, int space, const char *msg) {
-  if (!lua_checkstack(L, space)) {
+  /* keep some extra space to run error routines, if needed */
+  const int extra = 2 * LUA_MINSTACK;
+  if (!lua_checkstack(L, space + extra)) {
     if (msg)
       luaL_error(L, "stack overflow (%s)", msg);
     else