From: Jim Wise <jwise@draga.com>
Date: Thu, 9 Jun 2011 20:51:58 +0000 (-0400)
Subject: RANGE-REDUCTION also fails-on sunos x86-64.
X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=11cfbfd7e07650aa5dae84ed6170a0d041e25acb;p=sbcl.git

RANGE-REDUCTION also fails-on sunos x86-64.
---

diff --git a/tests/float.pure.lisp b/tests/float.pure.lisp
index ff01c2f..6c4815c 100644
--- a/tests/float.pure.lisp
+++ b/tests/float.pure.lisp
@@ -250,7 +250,7 @@
 ;;   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
-            :fails-on '(and :x86-64 (or :linux :darwin)))
+            :fails-on '(and :x86-64 (or :linux :darwin :sunos)))
   (flet ((almost= (x y)
            (< (abs (- x y)) 1d-5)))
     (macrolet ((foo (op value)