mirror of https://github.com/rusefi/lua.git
new commands to test `load'
This commit is contained in:
parent
b7a0503c1d
commit
9c3b3f82fe
11
ltests.c
11
ltests.c
|
@ -1,5 +1,5 @@
|
|||
/*
|
||||
** $Id: ltests.c,v 1.120 2002/05/06 19:05:10 roberto Exp roberto $
|
||||
** $Id: ltests.c,v 1.121 2002/05/13 13:10:04 roberto Exp roberto $
|
||||
** Internal Module for Debugging of the Lua Implementation
|
||||
** See Copyright Notice in lua.h
|
||||
*/
|
||||
|
@ -638,8 +638,13 @@ static int testC (lua_State *L) {
|
|||
int nres = getnum;
|
||||
lua_call(L, narg, nres);
|
||||
}
|
||||
else if EQ("dostring") {
|
||||
lua_dostring(L, luaL_check_string(L, getnum));
|
||||
else if EQ("loadstring") {
|
||||
size_t sl;
|
||||
const char *s = luaL_check_lstr(L, getnum, &sl);
|
||||
lua_loadbuffer(L, s, sl, s);
|
||||
}
|
||||
else if EQ("loadfile") {
|
||||
lua_loadfile(L, luaL_check_string(L, getnum));
|
||||
}
|
||||
else if EQ("setmetatable") {
|
||||
lua_setmetatable(L, getnum);
|
||||
|
|
Loading…
Reference in New Issue