~ chicken-r7rs (master) fb4f0d933e8204fd31c5317bd0ddbc4370c2dbcd
commit fb4f0d933e8204fd31c5317bd0ddbc4370c2dbcd
Author: Evan Hanson <evhan@foldling.org>
AuthorDate: Tue Sep 20 11:32:34 2016 +1200
Commit: Evan Hanson <evhan@foldling.org>
CommitDate: Tue Sep 20 11:32:34 2016 +1200
Drop export of nonexistent "infinite?" from scheme.inexact with no-numbers
diff --git a/scheme.inexact.scm b/scheme.inexact.scm
index 76c8efd..b726af7 100644
--- a/scheme.inexact.scm
+++ b/scheme.inexact.scm
@@ -3,7 +3,7 @@
(cond-expand
(no-numbers
(import chicken)
- (export acos asin atan exp infinite? sin cos tan finite? log sqrt))
+ (export acos asin atan exp sin cos tan finite? log sqrt))
(else
(import numbers)
(export acos asin atan exp infinite? sin cos tan finite? log sqrt nan?))))
Trap