|
|
@ -1,5 +1,5 @@ |
|
|
|
/*
|
|
|
|
** $Id: ltests.c,v 2.195 2014/11/10 17:41:36 roberto Exp roberto $ |
|
|
|
** $Id: ltests.c,v 2.196 2014/11/11 17:15:06 roberto Exp roberto $ |
|
|
|
** Internal Module for Debugging of the Lua Implementation |
|
|
|
** See Copyright Notice in lua.h |
|
|
|
*/ |
|
|
@ -1096,7 +1096,10 @@ static int runC (lua_State *L, lua_State *L1, const char *pc) { |
|
|
|
} |
|
|
|
else if EQ("checkstack") { |
|
|
|
int sz = getnum; |
|
|
|
luaL_checkstack(L1, sz, getstring); |
|
|
|
const char *msg = getstring; |
|
|
|
if (*msg == '\0') |
|
|
|
msg = NULL; /* to test 'luaL_checkstack' with no message */ |
|
|
|
luaL_checkstack(L1, sz, msg); |
|
|
|
} |
|
|
|
else if EQ("compare") { |
|
|
|
int a = getindex; |
|
|
|