Skip to content
Snippets Groups Projects
Commit 07a63ae1 authored by pfdietz's avatar pfdietz
Browse files

Test of a cmucl/sbcl bug; this test exhibits the bug in sbcl on sparcs.

parent b5ab7251
Branches
Tags
No related merge requests found
......@@ -877,3 +877,12 @@
(apply (compile nil form2) vals)))
t)
;;; sbcl/cmucl bug (on sparc)
(deftest misc.67
(funcall
(compile nil '(lambda (x)
(declare (type (integer 10604862 10604862) x)
(optimize speed))
(* x 390)))
10604862)
4135896180)
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment