Commit 3a99734f authored by pfdietz's avatar pfdietz
Browse files

Fixed busted test FUNCALL.7, which was illegally lexically binding a function to CONS.

parent 33f928e4
......@@ -32,10 +32,12 @@
(funcall #'(lambda (x y) (cons x y)) 'a 'b)
(a . b))
(defun xcons (x y) (cons x y))
(deftest funcall.7
(flet ((cons (x y) (list y x)))
(values (funcall 'cons 1 2)
(funcall #'cons 1 2)))
(flet ((xcons (x y) (list y x)))
(values (funcall 'xcons 1 2)
(funcall #'xcons 1 2)))
(1 . 2)
(2 1))
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment