X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=tests%2Fcompiler.pure.lisp;h=4b3d1de59036b9939b52f86fc535b1923d86ee54;hb=2e498cbcb062ff8b6e21703838e214c6427bffe8;hp=c3ce69e5091c25095c3b69f60921ab6f966352f7;hpb=1a60ff79067ec697c476185e0c79565dacf8c8c0;p=sbcl.git

diff --git a/tests/compiler.pure.lisp b/tests/compiler.pure.lisp
index c3ce69e..4b3d1de 100644
--- a/tests/compiler.pure.lisp
+++ b/tests/compiler.pure.lisp
@@ -2248,3 +2248,6 @@
                                              (simple-vector s))
                                     (copy-seq s)))
                     (vector 1 2 3 4)))))
+
+;;; bug in adding DATA-VECTOR-REF-WITH-OFFSET to x86-64
+(assert (not (mismatch #(1.0f0 2.0f0) (make-array 2 :element-type 'single-float :initial-contents (list 1.0f0 2.0f0)))))