Skip to content

Commit a2831ac

Browse files
committed
Fennel+Aniseed updates
1 parent beb9c17 commit a2831ac

File tree

4 files changed

+679
-609
lines changed

4 files changed

+679
-609
lines changed

lua/conjure/aniseed/core.lua

+1-1
Original file line numberDiff line numberDiff line change
@@ -389,7 +389,7 @@ local function assoc(t, ...)
389389
local _let_53_ = {...}
390390
local k = _let_53_[1]
391391
local v = _let_53_[2]
392-
local xs = (getmetatable(_let_53_) and getmetatable(_let_53_).__fennelrest and getmetatable(_let_53_).__fennelrest(_let_53_, 3)) or {(table.unpack or unpack)(_let_53_, 3)}
392+
local xs = (function (t, k) local mt = getmetatable(t) if "table" == type(mt) and mt.__fennelrest then return mt.__fennelrest(t, k) else return {(table.unpack or unpack)(t, k)} end end)(_let_53_, 3)
393393
local rem = count(xs)
394394
local t0 = (t or {})
395395
if odd_3f(rem) then

0 commit comments

Comments
 (0)