vxcontrol/lualibs-luajit
1
0
Fork 0
mirror of https://github.com/vxcontrol/lualibs-luajit.git synced 2026-07-01 14:40:45 -04:00
Code Issues Packages Projects Releases Wiki Activity

unimportant

Browse Source
This commit is contained in:
Cosmin Apreutesei
2019-02-17 01:37:34 +02:00
parent f1a291c12b
commit 8707ed99ef
1 changed files with 12 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files
csrc/luajit/src/src/luajit.c
+12 -7
View File
@@ -276,17 +276,22 @@ static int handle_script(lua_State *L, char **argx)
#ifdef LUAPOWER_BUILD
// call require('terra') before running a *.t file.
if (fname) {
int len = strlen(fname);
if (len >= 3 && fname[len - 1] == 't' && fname[len - 2] == '.') {
lua_getglobal(L, "require");
lua_pushliteral(L, "terra");
lua_call(L, 1, 0);
}
int len = strlen(fname);
if (len >= 3 && fname[len - 1] == 't' && fname[len - 2] == '.') {
lua_getglobal(L, "require");
lua_pushliteral(L, "terra");
lua_call(L, 1, 0);
}
}
// use terra-overriden _G.loadfile instead of luaL_loadfile.
int top = lua_gettop(L);
lua_getglobal(L, "loadfile");
lua_pushstring(L, fname);
status = lua_pcall(L, 1, 1, 0); // pushes the chunk or an error message
lua_call(L, 1, LUA_MULTRET); // pushes the chunk or nil + error message
int nresults = lua_gettop(L) - top;
status = nresults == 2 && lua_isnil(L, -2);
if (status)
lua_remove(L, -2); // remove the nil, leave the error message
#else
status = luaL_loadfile(L, fname); // pushes the chunk or an error message
#endif