This commit is contained in:
Calvin Rose 2024-01-01 08:58:10 -06:00
parent e8ed961572
commit 9142f38cbc
2 changed files with 5 additions and 0 deletions

View File

@ -2127,6 +2127,7 @@
'upscope expandall})
(defn dotup [t]
(if (= nil (next t)) (break ()))
(def h (in t 0))
(def s (in specs h))
(def entry (or (dyn h) {}))

View File

@ -968,4 +968,8 @@
(identity a))
(assert (= [1 2 3] (regress-1330)) "regression 1330")
# Issue 1341
(assert (= () '() (macex '())) "macex ()")
(assert (= '[] (macex '[])) "macex []")
(end-suite)