diff options
Diffstat (limited to 'srfi')
-rw-r--r-- | srfi/ChangeLog | 5 | ||||
-rw-r--r-- | srfi/srfi-1.scm | 14 | ||||
-rw-r--r-- | srfi/srfi-13.scm | 13 |
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 |