X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=tests%2Ffloat.pure.lisp;h=d1a5bc4a3aae13985766a788aa64ba1dbc2dd896;hb=97dd06859cae90c8ef9021dafe1beebb78b1547f;hp=7b9502c4000ce5684333acc4dd0ef8326ec164d5;hpb=4c81c652cdc32faefee1bccb84c3c9a7854e3edd;p=sbcl.git

diff --git a/tests/float.pure.lisp b/tests/float.pure.lisp
index 7b9502c..d1a5bc4 100644
--- a/tests/float.pure.lisp
+++ b/tests/float.pure.lisp
@@ -249,7 +249,8 @@
 ;;   The x86 port used not to reduce the arguments of transcendentals
 ;;   correctly. On other platforms, we trust libm to DTRT.
 ;; but it doesn't cost any real amount to just test them all
-(with-test (:name :range-reduction)
+(with-test (:name :range-reduction
+            :fails-on ':x86-64)
   (flet ((almost= (x y)
            (< (abs (- x y)) 1d-5)))
     (macrolet ((foo (op value)