Function call_function

src/LuaExtension.cpp:257–302

}

[[maybe_unused]] static bool call_function(lua_State *L, int nargs, bool ignoreFunctionReturnValue=false) {
    bool handled = false;
    if (L) {
        int traceback = 0;
        if (tracebackEnabled) {
            lua_getglobal(L, "debug");
            lua_getfield(L, -1, "traceback");
            lua_remove(L, -2);
            if (lua_isfunction(L, -1)) {
                traceback = lua_gettop(L) - nargs - 1;
                lua_insert(L, traceback);
            } else {
                lua_pop(L, 1);
            }
        }

        int result = lua_pcall(L, nargs, ignoreFunctionReturnValue ? 0 : 1, traceback);

        if (traceback) {
            lua_remove(L, traceback);
        }

        if (result == LUA_OK) {
            if (ignoreFunctionReturnValue) {
                handled = true;
            } else {
                handled = (0 != lua_toboolean(L, -1));
                lua_pop(L, 1);
            }
        } else if (result == LUA_ERRRUN) {
            lua_getglobal(L, "print");
            lua_insert(L, -2); // use pushed error message
            lua_pcall(L, 1, 0, 0);
        } else {
            lua_pop(L, 1);
            if (result == LUA_ERRMEM) {
                hostTraceError("Memory allocation error\n");
            } else if (result == LUA_ERRERR) {
                hostTraceError("An error occurred, but cannot be reported due to failure in _TRACEBACK\n");
            } else {
                hostTraceError("Unexpected error\n");
            }
        }
    }
    return handled;
}

struct ScintillaFailure {
    sptr_t status;