Name: Patch scite to use distro package of lua, Devuan Version: 5.2.2 Lua Version: 5.4.4 Author: bgstack15@gmail.com Date: 2022-04-04 diff -aur scite/gtk/deps.mak scite/gtk/deps.mak --- a/scite/gtk/deps.mak 2022-03-30 20:48:24.000000000 -0400 +++ b/scite/gtk/deps.mak 2022-04-04 14:47:39.110529717 -0400 @@ -469,13 +469,6 @@ ../lua/src/luaconf.h \ ../lua/src/lauxlib.h \ ../lua/src/lualib.h -lbitlib.o: \ - ../lua/src/lbitlib.c \ - ../lua/src/lprefix.h \ - ../lua/src/lua.h \ - ../lua/src/luaconf.h \ - ../lua/src/lauxlib.h \ - ../lua/src/lualib.h lcode.o: \ ../lua/src/lcode.c \ ../lua/src/lprefix.h \ diff -aur scite/src/LuaExtension.cxx scite/src/LuaExtension.cxx --- a/scite/src/LuaExtension.cxx 2022-03-30 20:48:24.000000000 -0400 +++ b/scite/src/LuaExtension.cxx 2022-04-04 14:46:35.097978533 -0400 @@ -237,7 +237,7 @@ const int paneIndex = lua_upvalueindex(1); check_pane_object(L, paneIndex); - const int message = luaL_checkint(L, 1); + const int message = luaL_checkinteger(L, 1); lua_pushvalue(L, paneIndex); lua_replace(L, 1); @@ -276,7 +276,7 @@ } static int cf_scite_constname(lua_State *L) { - const int message = luaL_checkint(L, 1); + const int message = luaL_checkinteger(L, 1); const char *prefix = luaL_optstring(L, 2, nullptr); const std::string constName = IFaceTable::GetConstantName(message, prefix); if (constName.length() > 0) { @@ -307,7 +307,7 @@ } static int cf_scite_menu_command(lua_State *L) { - const int cmdID = luaL_checkint(L, 1); + const int cmdID = luaL_checkinteger(L, 1); if (cmdID) { host->DoMenuCommand(cmdID); } @@ -329,7 +329,7 @@ } static int cf_scite_strip_set(lua_State *L) { - const int control = luaL_checkint(L, 1); + const int control = luaL_checkinteger(L, 1); const char *value = luaL_checkstring(L, 2); if (value) { host->UserStripSet(control, value); @@ -338,7 +338,7 @@ } static int cf_scite_strip_set_list(lua_State *L) { - const int control = luaL_checkint(L, 1); + const int control = luaL_checkinteger(L, 1); const char *value = luaL_checkstring(L, 2); if (value) { host->UserStripSetList(control, value); @@ -347,7 +347,7 @@ } static int cf_scite_strip_value(lua_State *L) { - const int control = luaL_checkint(L, 1); + const int control = luaL_checkinteger(L, 1); std::string value = host->UserStripValue(control); push_string(L, value); return 1; @@ -437,7 +437,7 @@ SA::Position rangeStart = 0; SA::Position rangeEnd = 0; - const int flags = (nArgs > 2) ? luaL_checkint(L, 3) : 0; + const int flags = (nArgs > 2) ? luaL_checkinteger(L, 3) : 0; hasError = (flags == 0 && lua_gettop(L) > nArgs); if (!hasError) { @@ -514,7 +514,7 @@ SA::ScintillaCall &sc = host->PaneCaller(pmo->pane); sc.SetTarget(pmo->range); - sc.ReplaceTarget(lua_strlen(L, 2), replacement); + sc.ReplaceTarget(lua_rawlen(L, 2), replacement); pmo->range.end = sc.TargetEnd(); return 0; } @@ -600,7 +600,7 @@ pmo->endPosOrig = 0; pmo->flags = 0; if (nargs >= 3) { - pmo->flags = luaL_checkint(L, 3); + pmo->flags = luaL_checkinteger(L, 3); if (nargs >= 4) { pmo->range.end = pmo->endPosOrig = luaL_checkinteger(L, 4); if (pmo->range.end < 0) { @@ -765,7 +765,7 @@ const int nargs = lua_gettop(L); const char *code = luaL_checkstring(L, 1); const char *name = luaL_optstring(L, 2, code); - if (0 == luaL_loadbuffer(L, code, lua_strlen(L, 1), name)) { + if (0 == luaL_loadbuffer(L, code, lua_rawlen(L, 1), name)) { lua_call(L, 0, LUA_MULTRET); return lua_gettop(L) - nargs; } else { @@ -896,7 +896,7 @@ int loopParamCount = 2; if (func.paramType[0] == iface_length && func.paramType[1] == iface_string) { - params[0] = lua_strlen(L, arg); + params[0] = lua_rawlen(L, arg); params[1] = SptrFromString(params[0] ? lua_tostring(L, arg) : ""); loopParamCount = 0; } else if ((func.paramType[1] == iface_stringresult) || (func.returnType == iface_stringresult)) { @@ -915,8 +915,8 @@ const char *s = lua_tostring(L, arg++); params[i] = SptrFromString(s ? s : ""); } else if (func.paramType[i] == iface_keymod) { - const int keycode = luaL_checkint(L, arg++) & 0xFFFF; - const int modifiers = luaL_checkint(L, arg++) & + const int keycode = luaL_checkinteger(L, arg++) & 0xFFFF; + const int modifiers = luaL_checkinteger(L, arg++) & static_cast(SA::KeyMod::Shift|SA::KeyMod::Ctrl|SA::KeyMod::Alt); params[i] = keycode | (modifiers<<16); } else if (func.paramType[i] == iface_bool) { @@ -1805,7 +1805,7 @@ static int SetLevelAt(lua_State *L) { StylingContext *context = Context(L); const SA::Line line = luaL_checkinteger(L, 2); - const int level = luaL_checkint(L, 3); + const int level = luaL_checkinteger(L, 3); context->styler->SetLevel(line, static_cast(level)); return 0; } @@ -1820,7 +1820,7 @@ static int SetLineState(lua_State *L) { StylingContext *context = Context(L); const SA::Line line = luaL_checkinteger(L, 2); - const int stateOfLine = luaL_checkint(L, 3); + const int stateOfLine = luaL_checkinteger(L, 3); context->styler->SetLineState(line, stateOfLine); return 0; } @@ -1898,7 +1898,7 @@ StylingContext *context = Context(L); const SA::Position startPosStyle = luaL_checkinteger(L, 2); const SA::Position lengthStyle = luaL_checkinteger(L, 3); - const int initialStyle = luaL_checkint(L, 4); + const int initialStyle = luaL_checkinteger(L, 4); context->StartStyling(startPosStyle, lengthStyle, initialStyle); return 0; } @@ -1957,7 +1957,7 @@ static int SetState(lua_State *L) { StylingContext *context = Context(L); context->Colourize(); - context->state = luaL_checkint(L, 2); + context->state = luaL_checkinteger(L, 2); return 0; } @@ -1965,13 +1965,13 @@ StylingContext *context = Context(L); context->Forward(); context->Colourize(); - context->state = luaL_checkint(L, 2); + context->state = luaL_checkinteger(L, 2); return 0; } static int ChangeState(lua_State *L) { StylingContext *context = Context(L); - context->state = luaL_checkint(L, 2); + context->state = luaL_checkinteger(L, 2); return 0; }