Commit 691d6164 authored by pfdietz's avatar pfdietz
Browse files

And another test for that bug, this one for LOGEQV

parent e03f2470
...@@ -10775,3 +10775,15 @@ Broken at C::WT-MAKE-CLOSURE. ...@@ -10775,3 +10775,15 @@ Broken at C::WT-MAKE-CLOSURE.
(space 1) (compilation-speed 3))) (space 1) (compilation-speed 3)))
(logxor (ash 0 (min 90 0)) 0)))) (logxor (ash 0 (min 90 0)) 0))))
0) 0)
(deftest misc.601
(funcall
(compile
nil
'(lambda ()
(declare (notinline gcd))
(declare
(optimize (debug 3) (space 3) (safety 3)
(compilation-speed 2) (speed 3)))
(logeqv 0 (gcd 0)))))
-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