summaryrefslogtreecommitdiff
path: root/srfi
diff options
context:
space:
mode:
Diffstat (limited to 'srfi')
-rw-r--r--srfi/ChangeLog5
-rw-r--r--srfi/srfi-1.scm14
-rw-r--r--srfi/srfi-13.scm13
3 files changed, 5 insertions, 27 deletions
diff --git a/srfi/ChangeLog b/srfi/ChangeLog
index 8bf12a69e..c72e8380e 100644
--- a/srfi/ChangeLog
+++ b/srfi/ChangeLog
@@ -1,3 +1,8 @@
+2001-08-31 Dirk Herrmann <D.Herrmann@tu-bs.de>
+
+ * srfi-1.scm, srfi-13.scm: Remove the defines that were needed to
+ trick export from the beginning of the files.
+
2001-08-25 Thien-Thi Nguyen <ttn@revel.glug.org>
* srfi-19.scm (add-duration): Fix bug: Call `add-duration!' w/
diff --git a/srfi/srfi-1.scm b/srfi/srfi-1.scm
index f58c1ebfe..b4605d97c 100644
--- a/srfi/srfi-1.scm
+++ b/srfi/srfi-1.scm
@@ -60,20 +60,6 @@
:use-module (ice-9 session)
:use-module (ice-9 receive))
-(begin-deprecated
- ;; Prevent `export' from re-exporting core bindings. This behaviour
- ;; of `export' is deprecated and will disappear in one of the next
- ;; releases.
- (define iota #f)
- (define map #f)
- (define map-in-order #f)
- (define for-each #f)
- (define list-index #f)
- (define member #f)
- (define delete #f)
- (define delete! #f)
- (define assoc #f))
-
(export
;;; Constructors
;; cons <= in the core
diff --git a/srfi/srfi-13.scm b/srfi/srfi-13.scm
index b623c405e..90e7691a0 100644
--- a/srfi/srfi-13.scm
+++ b/srfi/srfi-13.scm
@@ -43,19 +43,6 @@
(define-module (srfi srfi-13))
-(begin-deprecated
- ;; Prevent `export' from re-exporting core bindings. This behaviour
- ;; of `export' is deprecated and will disappear in one of the next
- ;; releases.
- (define string->list #f)
- (define string-copy #f)
- (define string-fill! #f)
- (define string-index #f)
- (define string-upcase #f)
- (define string-upcase! #f)
- (define string-downcase #f)
- (define string-downcase! #f))
-
(export
;;; Predicates
;; string? string-null? <= in the core