mirror of
https://github.com/lua/lua
synced 2026-09-29 04:35:58 +03:00
new instructions 'newtable' and 'checkstack' in 'testC'
This commit is contained in:
parent
5f0a2f6248
commit
dcee7d2fe0
1 changed files with 8 additions and 1 deletions
9
ltests.c
9
ltests.c
|
|
@ -1,5 +1,5 @@
|
|||
/*
|
||||
** $Id: ltests.c,v 2.43 2007/06/21 13:48:04 roberto Exp roberto $
|
||||
** $Id: ltests.c,v 2.44 2007/11/12 16:28:45 roberto Exp roberto $
|
||||
** Internal Module for Debugging of the Lua Implementation
|
||||
** See Copyright Notice in lua.h
|
||||
*/
|
||||
|
|
@ -925,6 +925,9 @@ static int testC (lua_State *L) {
|
|||
else if EQ("pushbool") {
|
||||
lua_pushboolean(L1, getnum);
|
||||
}
|
||||
else if EQ("newtable") {
|
||||
lua_newtable(L1);
|
||||
}
|
||||
else if EQ("newuserdata") {
|
||||
lua_newuserdata(L1, getnum);
|
||||
}
|
||||
|
|
@ -998,6 +1001,10 @@ static int testC (lua_State *L) {
|
|||
int i = getindex;
|
||||
lua_pushinteger(L1, lua_objlen(L1, i));
|
||||
}
|
||||
else if EQ("checkstack") {
|
||||
if (!lua_checkstack(L1, getnum))
|
||||
luaL_error(L, "C stack overflow");
|
||||
}
|
||||
else if EQ("throw") {
|
||||
#if defined(__cplusplus)
|
||||
static struct X { int x; } x;
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue