aboutsummaryrefslogtreecommitdiff
path: root/.config/awesome/quarrel/delegate.lua
blob: 3ea6d75767e26d8ecc5bde3b19be3a9e8493b9b6 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
local M = {}

--- Capture `fn`'s upvalues and pass to `delegate`
---@param delegate fun(env: table<string, any>, _: ...): ...
---@param fn function
---@return fun(...): ...
function M.new(delegate, fn)
    local upvalues = {}
    for i = 1, debug.getinfo(fn, "u").nups do
        local name, value = debug.getupvalue(fn, i)
        upvalues[name] = value
    end
    return function(...)
        return delegate(upvalues, ...)
    end
end

return setmetatable(M, {
    __call = function(_, ...)
        return M.new(...)
    end,
})