Test number-theoretic division by -0.0.

* test-suite/tests/numbers.test ("Number-theoretic division"): Fix typo
  so that we actually test for division by -0.0.

diff --git a/test-suite/tests/numbers.test b/test-suite/tests/numbers.test
index a6697c9..ddbd209 100644 (file)
--- a/test-suite/tests/numbers.test
+++ b/test-suite/tests/numbers.test
@@ -4845,7 +4845,7 @@
                     (test+/- n d))))))
 
     (with-test-prefix "divide by zero"
-      (for `((0 0.0 +0.0))  ;; denominators
+      (for `((0 0.0 -0.0))  ;; denominators
            (lambda (d)
              (for `((15 ,(* 3/2 big) 18.0 33/7
                         0 0.0 -0.0 +inf.0 -inf.0 +nan.0))  ;; numerators