test hoisted functions too
This commit is contained in:
parent
8cc26ba1bf
commit
6f0e739b31
@ -520,7 +520,8 @@
|
||||
(assert (= 4 (eval (quote (+ x 2)))))
|
||||
(setf test-payload (quote (+ x 2)))
|
||||
(setf x 4)
|
||||
(assert (= 6 (eval test-payload))))
|
||||
(assert (= 6 (eval test-payload)))
|
||||
(assert (= 6 (eval (quote ((fn [] (+ 3 3))))))))
|
||||
|
||||
|
||||
|
||||
|
Loading…
x
Reference in New Issue
Block a user