1 files changed, 47 insertions, 0 deletions

diff --git a/luarocks.exe.c.patch b/luarocks.exe.c.patch
new file mode 100644
index 0000000..5410bfc
--- /dev/null
+++ b/luarocks.exe.c.patch
@@ -0,0 +1,47 @@
+--- luarocks.exe.c      2024-09-23 15:27:52.663551300 -0500
++++ luarocks.exe.c.orig 2024-09-23 15:25:00.870448000 -0500
+@@ -17,33 +17,6 @@
+ #define getprogname()
+ #endif
+ 
+-/* LUA_OK defined in lua 5.2+ */
+-#ifndef LUA_OK 
+-#define LUA_OK 0
+-#endif
+-
+-/* luaL_traceback() introduced in lua 5.2 */
+-#ifndef luaL_traceback
+-static inline void
+-luaL_traceback(lua_State *L, lua_State *L1, const char *msg, int level){
+-       lua_getfield(L, LUA_GLOBALSINDEX, "debug");
+-       if(!lua_istable(L,-1)){
+-               lua_pop(L,1);
+-               return;
+-       }
+-       lua_getfield(L, -1, "traceback");
+-       if(!lua_isfunction(L,-1)){
+-               lua_pop(L,2);
+-               return;
+-       }
+-       lua_pushthread(L1);
+-       lua_pushstring(L,msg);
+-       lua_pushnumber(L,level);
+-       lua_call(L,3,1);
+-       return;
+-}
+-#endif
+-
+ static int registry_key;
+ 
+ /* fatal error, from srlua */
+@@ -38309,9 +38282,7 @@
+       lua_pop(L, 1);
+       lua_getfield(L, -1, "loaders");               /* table table.insert package package.loaders */
+    }
+-        /* lua_copy introduced in lua 5.2 */
+-        lua_replace(L,3);
+-   //lua_copy(L, 4, 3);                               /* table table.insert package.searchers */
++   lua_copy(L, 4, 3);                               /* table table.insert package.searchers */
+    lua_settop(L, 3);                                /* table table.insert package.searchers */
+    lua_pushnumber(L, 1);                            /* table table.insert package.searchers 1 */
+    lua_pushcfunction(L, pkg_loader);                /* table table.insert package.searchers 1 pkg_loader */