aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--ltests.c11
1 files changed, 8 insertions, 3 deletions
diff --git a/ltests.c b/ltests.c
index 69b82dd7..02b74eb2 100644
--- a/ltests.c
+++ b/ltests.c
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: ltests.c,v 1.120 2002/05/06 19:05:10 roberto Exp roberto $ 2** $Id: ltests.c,v 1.121 2002/05/13 13:10:04 roberto Exp roberto $
3** Internal Module for Debugging of the Lua Implementation 3** Internal Module for Debugging of the Lua Implementation
4** See Copyright Notice in lua.h 4** See Copyright Notice in lua.h
5*/ 5*/
@@ -638,8 +638,13 @@ static int testC (lua_State *L) {
638 int nres = getnum; 638 int nres = getnum;
639 lua_call(L, narg, nres); 639 lua_call(L, narg, nres);
640 } 640 }
641 else if EQ("dostring") { 641 else if EQ("loadstring") {
642 lua_dostring(L, luaL_check_string(L, getnum)); 642 size_t sl;
643 const char *s = luaL_check_lstr(L, getnum, &sl);
644 lua_loadbuffer(L, s, sl, s);
645 }
646 else if EQ("loadfile") {
647 lua_loadfile(L, luaL_check_string(L, getnum));
643 } 648 }
644 else if EQ("setmetatable") { 649 else if EQ("setmetatable") {
645 lua_setmetatable(L, getnum); 650 lua_setmetatable(L, getnum);