60f61d1988
Mark FOX17 option broken (Not related to clang 6 in particular, the FOX-1.7
API is ever changing due to being a development version. This project
appears to be dead, so I'm not sure it is worth fixing.)
recorder.cpp:104:9: error: no matching member function for call to 'prepend'
NewMessage();
^~~~~~~~~~~~
recorder.cpp:51:6: note: expanded from macro 'NewMessage'
list.prepend((FXObject*)mm);
~~~~~^~~~~~~
/usr/local/include/fox-1.7/FXObjectList.h:256:10: note: candidate function not viable: no known conversion from 'FX::FXObject *' to 'MacroMessage *' for 1st argument
FXbool prepend(TYPE* object){ return FXObjectList::prepend(object); }
^
/usr/local/include/fox-1.7/FXObjectList.h:265:10: note: candidate function not viable: no known conversion from 'FX::FXObject *' to 'const FXObjectListOf<MacroMessage>' for 1st argument
FXbool prepend(const FXObjectListOf<TYPE>& objects){ return FXObjectList::prepend(objects); }
^
/usr/local/include/fox-1.7/FXObjectList.h:259:10: note: candidate function not viable: requires 2 arguments, but 1 was provided
FXbool prepend(TYPE* object,FXival n){ return FXObjectList::prepend(object,n); }
^
/usr/local/include/fox-1.7/FXObjectList.h:262:10: note: candidate function not viable: requires 2 arguments, but 1 was provided
FXbool prepend(TYPE** objects,FXival n){ return FXObjectList::prepend(objects,n); }
^
Rename/remake patches
103 lines
4 KiB
C++
103 lines
4 KiB
C++
--- src/macro.cpp.orig 2013-10-03 09:22:51 UTC
|
|
+++ src/macro.cpp
|
|
@@ -47,7 +47,7 @@ MacroRunner::~MacroRunner()
|
|
/* Catch and report script errors */
|
|
static FXint traceback(lua_State *L)
|
|
{
|
|
- lua_getfield(L, LUA_GLOBALSINDEX, "debug");
|
|
+ lua_getglobal(L, "debug");
|
|
if (!lua_istable(L, -1)) {
|
|
lua_pop(L, 1);
|
|
return 1;
|
|
@@ -324,7 +324,7 @@ static void debug_hook(lua_State *L, lua_Debug *ar)
|
|
/* Override a builtin Lua function, or add a new one if it doesn't exist */
|
|
static void override(lua_State *L, const char*module, const char* funcname, lua_CFunction newfunc)
|
|
{
|
|
- lua_getfield(L,LUA_GLOBALSINDEX,module);
|
|
+ lua_getglobal(L,module);
|
|
if (lua_istable(L,-1)) {
|
|
lua_pushstring(L,funcname);
|
|
if (newfunc) {
|
|
@@ -342,7 +342,7 @@ static void override(lua_State *L, const char*module,
|
|
/* Don't let scripts try to read from stdin, as this would block indefinitely */
|
|
static void close_stdin(lua_State *L)
|
|
{
|
|
- lua_getfield(L, LUA_GLOBALSINDEX, "io");
|
|
+ lua_getglobal(L, "io");
|
|
if (!lua_istable(L, -1)) {
|
|
lua_pop(L, 1);
|
|
return;
|
|
@@ -384,7 +384,7 @@ typedef struct {
|
|
|
|
void MacroRunner::ClearKeepers()
|
|
{
|
|
- for (FXint i=keepers.first(); i<=keepers.last(); i=keepers.next(i)) {
|
|
+ if (UsedSlotsInDict(&keepers)>0) for (FXint i=0; i<TotalSlotsInDict(&keepers); ++i) {
|
|
PersistRecord*pr=(PersistRecord*)keepers.data(i);
|
|
if (pr) {
|
|
if (pr->t==LUA_TSTRING) {
|
|
@@ -406,11 +406,12 @@ void MacroRunner::PushKeepers(lua_State *L)
|
|
lua_pushstring(L,PERSIST_TABLE_NAME);
|
|
lua_newtable(L);
|
|
lua_settable(L, -3);
|
|
- for (FXint i=keepers.first(); i<=keepers.last(); i=keepers.next(i)) {
|
|
+ if (UsedSlotsInDict(&keepers)>0) for (FXint i=0; i<TotalSlotsInDict(&keepers); ++i) {
|
|
PersistRecord*pr=(PersistRecord*)keepers.data(i);
|
|
+ if (!pr) { continue; }
|
|
lua_getglobal(L, LUA_MODULE_NAME);
|
|
lua_getfield(L,-1,PERSIST_TABLE_NAME);
|
|
- lua_pushstring(L,keepers.key(i));
|
|
+ lua_pushstring(L,DictKeyName(keepers,i));
|
|
switch (pr->t) {
|
|
case LUA_TNUMBER: { lua_pushnumber(L, pr->n); break;}
|
|
case LUA_TBOOLEAN:{ lua_pushboolean(L, pr->b); break;}
|
|
@@ -455,7 +456,7 @@ void MacroRunner::PopKeepers(lua_State *L)
|
|
}
|
|
}
|
|
if (pr) {
|
|
- keepers.replace(lua_tostring(L,-2), pr);
|
|
+ ReplaceInDict(&keepers,lua_tostring(L,-2),pr);
|
|
}
|
|
}
|
|
lua_pop(L, 1);
|
|
@@ -479,6 +480,9 @@ bool MacroRunner::RunMacro(const FXString &source, boo
|
|
lua_State *L=luaL_newstate();
|
|
luaL_openlibs(L);
|
|
luaopen_dialog(L);
|
|
+#if LUA_VERSION_NUM>=502
|
|
+ lua_setglobal(L, "dialog");
|
|
+#endif
|
|
override(L,"os","exit", osexit);
|
|
override(L,"io","stdin", NULL);
|
|
override(L,"_G","print", print);
|
|
@@ -487,11 +491,27 @@ bool MacroRunner::RunMacro(const FXString &source, boo
|
|
si->script=isfilename?source.text():NULL;
|
|
states.append(si);
|
|
lua_sethook(L,debug_hook,LUA_MASKLINE,1);
|
|
- luaL_register(L, LUA_MODULE_NAME, LuaFuncs());
|
|
- luaL_register(L, LUA_MODULE_NAME, LuaFxUtils(TopWinPub::instance(), EXE_NAME));
|
|
+#if LUA_VERSION_NUM<502
|
|
+ luaL_Register(L, LUA_MODULE_NAME, LuaFuncs());
|
|
+ luaL_Register(L, LUA_MODULE_NAME, LuaFxUtils(TopWinPub::instance(), EXE_NAME));
|
|
+ luaL_Register(L, LUA_MODULE_NAME, LuaCommands(TopWinPub::instance()));
|
|
+#else
|
|
+ int n=0;
|
|
+ const luaL_Reg*p;
|
|
+ const luaL_Reg*funcs = LuaFuncs();
|
|
+ const luaL_Reg*utils = LuaFxUtils(TopWinPub::instance(), EXE_NAME);
|
|
+ const luaL_Reg*cmds = LuaCommands(TopWinPub::instance());
|
|
+ for (p=funcs; p->name; p++) { n++; }
|
|
+ for (p=utils; p->name; p++) { n++; }
|
|
+ for (p=cmds; p->name; p++) { n++; }
|
|
+ lua_createtable(L, 0, n);
|
|
+ luaL_setfuncs(L, funcs, 0);
|
|
+ luaL_setfuncs(L, utils, 0);
|
|
+ luaL_setfuncs(L, cmds, 0);
|
|
+ lua_setglobal(L, LUA_MODULE_NAME);
|
|
+#endif
|
|
override(L,LUA_MODULE_NAME,"script", scriptname);
|
|
override(L,LUA_MODULE_NAME,"optimize", optimize);
|
|
- luaL_openlib(L, LUA_MODULE_NAME, LuaCommands(TopWinPub::instance()), 0);
|
|
set_string_token(L, "_VERSION", VERSION);
|
|
PushKeepers(L);
|
|
if (isfilename) {
|