Confirm #i works with inf and nan.
authorTaylor R Campbell <campbell@mumble.net>
Fri, 7 Dec 2018 03:55:05 +0000 (03:55 +0000)
committerTaylor R Campbell <campbell@mumble.net>
Fri, 7 Dec 2018 17:17:28 +0000 (17:17 +0000)
tests/runtime/test-readwrite.scm

index 17a41687d1f94a843decc64615890437a8391c99..2bad4a20ffff04755acf36e9d997129201ee2f6a 100644 (file)
@@ -174,7 +174,11 @@ USA.
 
 (define-enumerated-test 'read
   `(("+nan.0" ,assert-nan)
-    ("-nan.0" ,assert-nan))
+    ("-nan.0" ,assert-nan)
+    ("#i+nan.0" ,assert-nan)
+    ("#i-nan.0" ,assert-nan)
+    ("#i+inf.0" ,assert-inf+)
+    ("#i-inf.0" ,assert-inf-))
   (lambda (string assertion #!optional xfail)
     (with-expected-failure xfail
       (lambda ()