~ chicken-core (master) 40099196f6a81bb2bdb7280504e167aa3dc39dbb
commit 40099196f6a81bb2bdb7280504e167aa3dc39dbb
Author: felix <felix@call-with-current-continuation.org>
AuthorDate: Wed Jun 3 11:43:58 2026 +0200
Commit: felix <felix@call-with-current-continuation.org>
CommitDate: Wed Jun 3 11:43:58 2026 +0200
drop superfluous scheme.base exports
diff --git a/modules.scm b/modules.scm
index e5e81463..dfd58c4b 100644
--- a/modules.scm
+++ b/modules.scm
@@ -1201,7 +1201,6 @@
(rationalize . scheme#rationalize)
(inexact . scheme#exact->inexact)
(exact . scheme#inexact->exact)
- (sqrt . scheme#sqrt)
(square . scheme#square)
(exact-integer-sqrt . scheme#exact-integer-sqrt)
(expt . scheme#expt)
@@ -1250,8 +1249,6 @@
(current-input-port . scheme#current-input-port)
(current-output-port . scheme#current-output-port)
(current-error-port . chicken.base#current-error-port)
- (open-input-file . scheme#open-input-file)
- (open-output-file . scheme#open-output-file)
(close-input-port . scheme#close-input-port)
(close-output-port . scheme#close-output-port)
(read-char . scheme#read-char) (peek-char . scheme#peek-char)
@@ -1262,15 +1259,11 @@
(eof-object? . scheme#eof-object?)
(eof-object . scheme#eof-object)
(flush-output-port . chicken.base#flush-output)
- (with-input-from-file . scheme#with-input-from-file)
- (with-output-to-file . scheme#with-output-to-file)
(close-port . scheme#close-port)
(char-ready? . scheme#char-ready?)
(u8-ready? . scheme#u8-ready?)
(numerator . scheme#numerator)
(denominator . scheme#denominator)
- (scheme-report-environment . scheme#scheme-report-environment)
- (null-environment . scheme#null-environment)
(open-input-string . scheme#open-input-string)
(open-output-string . scheme#open-output-string)
(open-output-bytevector . scheme#open-output-bytevector)
@@ -1306,7 +1299,7 @@
parameterize when unless do define define-syntax case cond guard
define-record-type include include-ci set! syntax-rules cond-expand
import export begin import-for-syntax and or lambda if quote
- case-lambda quasiquote syntax-error let-syntax letrec-syntax)
+ quasiquote syntax-error let-syntax letrec-syntax)
(##sys#macro-environment)))
;; Hack for library.scm to use macros from modules it defines itself.
Trap