mirrors/lua
1
0
Fork 0
mirror of https://github.com/lua/lua synced 2024-11-26 14:51:21 +03:00
Code Issues Packages Projects Releases Wiki Activity

tests for compatibility functions lua_dostring/lua_dofile

Browse Source
This commit is contained in:
Roberto Ierusalimschy 2002-10-22 15:07:55 -03:00
parent 11886dc7b0
commit 4fb9110a6e
1 changed files with 13 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
ltests.c
View File

@ -1,5 +1,5 @@
/*
** $Id: ltests.c,v 1.135 2002/09/05 19:57:08 roberto Exp roberto $
** $Id: ltests.c,v 1.136 2002/10/22 17:18:28 roberto Exp roberto $
** Internal Module for Debugging of the Lua Implementation
** See Copyright Notice in lua.h
*/
@ -478,6 +478,17 @@ static int log2_aux (lua_State *L) {
}
static int test_do (lua_State *L) {
const char *p = luaL_check_string(L, 1);
if (*p == '@')
lua_dofile(L, p+1);
else
lua_dostring(L, p);
return lua_gettop(L);
}
/*
** {======================================================
** function to test the API with C. It interprets a kind of assembler
@ -683,6 +694,7 @@ static const struct luaL_reg tests_funcs[] = {
{"stacklevel", stacklevel},
{"querystr", string_query},
{"querytab", table_query},
{"doit", test_do},
{"testC", testC},
{"ref", tref},
{"getref", getref},