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<int>(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<SA::FoldLevel>(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;
 	}