~ 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