mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-20 11:40:18 +02:00
Code Activity

doc: Document how (ice-9 format) replaces 'format'.

Browse source 
* doc/ref/misc-modules.texi (Formatted Output): Add paragraph.
* module/ice-9/format.scm: Add comment.

Co-authored-by: Ludovic Courtès <ludo@gnu.org>
This commit is contained in:
Jean Abou Samra 2022-10-01 16:14:17 +02:00 • committed by Ludovic Courtès
parent 6847365a9f
commit bc3b1a4e2d
2 changed files with 18 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

10
doc/ref/misc-modules.texi
View file

@ -1122,6 +1122,16 @@ you try to use one of them. The reason for two versions is that the
full @code{format} is fairly large and requires some time to load. full @code{format} is fairly large and requires some time to load.
@code{simple-format} is often adequate too. @code{simple-format} is often adequate too.
@quotation Note
Beware that when @code{(ice-9 format)} is loaded, it replaces the
binding for @code{format} on the toplevel. If your module loads
another module that loads @code{(ice-9 format)}, then your module
will see the @code{format} function from @code{(ice-9 format)},
even if it does not itself import @code{(ice-9 format)}.
@emph{This is legacy behavior and may be removed in a future Guile
version.}
@end quotation
@node File Tree Walk @node File Tree Walk
@section File Tree Walk @section File Tree Walk

9
module/ice-9/format.scm
View file

@ -32,6 +32,8 @@
(define-module (ice-9 format) (define-module (ice-9 format)
#:autoload (ice-9 pretty-print) (pretty-print truncated-print) #:autoload (ice-9 pretty-print) (pretty-print truncated-print)
#:autoload (ice-9 i18n) (%global-locale number->locale-string) #:autoload (ice-9 i18n) (%global-locale number->locale-string)
;; Actually replaces the global format as soon as loaded; see the end
;; of this file.
#:replace (format)) #:replace (format))
(define format:version "3.0") (define format:version "3.0")
@ -1560,5 +1562,10 @@
(close-port port) (close-port port)
str))))) str)))))
;; Thanks to Shuji Narazaki ;; Set the format variable in the root module. This is legacy and
;; no longer necessary. It means that as soon as (ice-9 format) is
;; loaded somewhere by some module, the predefined binding for format
;; becomes the extended format function, even in modules where (ice-9 format)
;; isn't imported. Because of this, removing this line should be done
;; when a backwards compatibility break is allowed.
(module-set! the-root-module 'format format) (module-set! the-root-module 'format format)