Commit 2a4c2dea authored by pfdietz's avatar pfdietz
Browse files

Commented out two busted tests: we cannot assume that #'(setf car) is valid.

parent 93a53c35
......@@ -39,9 +39,9 @@
(typep '(lambda (x) x) 'function)
nil)
(deftest function.7
(not (typep #'(setf car) 'function))
nil)
;;; (deftest function.7
;;; (not (typep #'(setf car) 'function))
;;; nil)
(deftest function.8
(not (typep #'(lambda (x) x) 'function))
......
......@@ -39,9 +39,9 @@
(functionp '(lambda (x) x))
nil)
(deftest functionp.7
(not (functionp #'(setf car)))
nil)
;;; (deftest functionp.7
;;; (not (functionp #'(setf car)))
;;; nil)
(deftest functionp.8
(not (functionp #'(lambda (x) x)))
......
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