From: Arthur A. Gleckler <gnu@speechcode.com>
Date: Thu, 2 Sep 2010 03:48:14 +0000 (-0700)
Subject: Removed the divisions by zero that I had used to create floating-point
X-Git-Tag: 20101212-Gtk~72
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=38fff71d886c5d2b6ecb919c019440f0d1363b75;p=mit-scheme.git

Removed the divisions by zero that I had used to create floating-point
infinities since those are supposed to trap, not actually return
infinities.  On OS X, the trap doesn't happen, but I shouldn't depend
on a bug.
---

diff --git a/tests/microcode/test-flonum-casts.scm b/tests/microcode/test-flonum-casts.scm
index e27e60d16..48b7a6418 100644
--- a/tests/microcode/test-flonum-casts.scm
+++ b/tests/microcode/test-flonum-casts.scm
@@ -53,10 +53,6 @@ USA.
        flonum
        (itof integer-as-bit-string)))
 
-    (test (/ 1.0 0.0)
-	  #*0111111111110000000000000000000000000000000000000000000000000000)
-    (test (/ -1.0 0.0)
-	  #*1111111111110000000000000000000000000000000000000000000000000000)
     (test 0.0
 	  #*0000000000000000000000000000000000000000000000000000000000000000)
     (test -0.0