diff options
author | Martin Grabmüller <mgrabmue@cs.tu-berlin.de> | 2001-05-23 05:04:55 +0000 |
---|---|---|
committer | Martin Grabmüller <mgrabmue@cs.tu-berlin.de> | 2001-05-23 05:04:55 +0000 |
commit | 1b2f40b9f1b5950f014ad44943e081fc8b004970 (patch) | |
tree | 41d805014b4411210bc2f7bf118dc41a19d389dd /srfi/srfi-13.scm | |
parent | d579d1652d5c334f83096e36e62763a5c5d7141e (diff) | |
download | guile-1b2f40b9f1b5950f014ad44943e081fc8b004970.tar.gz |
* README: Update, document available SRFIs.
* srfi-19.scm, srfi-17.scm, srfi-16.scm, srfi-14.scm, srfi-13.scm,
srfi-11.scm, srfi-10.scm, srfi-9.scm, srfi-8.scm, srfi-6.scm,
srfi-2.scm: Use `cond-expand-provide' for providing features to
`cond-expand'.
Diffstat (limited to 'srfi/srfi-13.scm')
-rw-r--r-- | srfi/srfi-13.scm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/srfi/srfi-13.scm b/srfi/srfi-13.scm index 612518105..76fcc6d06 100644 --- a/srfi/srfi-13.scm +++ b/srfi/srfi-13.scm @@ -110,6 +110,8 @@ string-delete ) +(cond-expand-provide (current-module) '(srfi-13)) + (dynamic-call "scm_init_srfi_13" (dynamic-link "libguile-srfi-srfi-13-14")) (define string-hash @@ -139,3 +141,4 @@ (caddr rest) (string-length s)))) (hash (string-upcase (substring/shared s start end)) bound)))) + |