Commit 45c794f3 authored by pfdietz's avatar pfdietz
Browse files

Relaxed test misc.539

parent 0629d97b
......@@ -9971,14 +9971,14 @@ Broken at C::WT-MAKE-CLOSURE.
;;; Error: `#c(0 -8)' is not of the expected type `REAL'
(deftest misc.539
(=t
(notnot-mv
(complexp
(funcall
(compile nil '(lambda (x)
(declare (OPTIMIZE SPEED (SAFETY 1))
(type (eql #c(0 -8)) x))
(sqrt x)))
#c(0 -8))
#c(2 -2))
#c(0 -8))))
t)
;;; Illegal instruction
......
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