mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-06-12 14:50:19 +02:00
Prevent `export' from re-exporting core bindings.
This commit is contained in:
parent
45cf8cd6aa
commit
3d968b4e8b
1 changed files with 13 additions and 0 deletions
|
@ -43,6 +43,19 @@
|
||||||
|
|
||||||
(define-module (srfi srfi-13))
|
(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 f 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
|
(export
|
||||||
;;; Predicates
|
;;; Predicates
|
||||||
;; string? string-null? <= in the core
|
;; string? string-null? <= in the core
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue