diff options
author | Nguyễn Thái Ngọc Duy <pclouds@gmail.com> | 2020-02-15 06:46:07 +0700 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2020-03-07 16:14:23 +0100 |
commit | cefbfac520e8552ae61207fde14a3fd5df87114b (patch) | |
tree | cfc9f46a4bcfa09d363042296364b604879099a4 | |
parent | cacf690d914d8e215939d2fa40ca3e8264ba1cfb (diff) | |
download | guile-cefbfac520e8552ae61207fde14a3fd5df87114b.tar.gz |
Accept .sld as scheme extensions in r7rs
This is similar to 0bb980f12 (New function: install-r6rs!, 2019-09-25)
which accepts .sls extension for r6rs. In r7rs, most portable libraries
use .sld.
* module/ice-9/boot-9.scm (install-r7rs!): Update %load-extensions.
Signed-off-by: Ludovic Courtès <ludo@gnu.org>
-rw-r--r-- | module/ice-9/boot-9.scm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/module/ice-9/boot-9.scm b/module/ice-9/boot-9.scm index 004d13937..0d37f3d48 100644 --- a/module/ice-9/boot-9.scm +++ b/module/ice-9/boot-9.scm @@ -4597,6 +4597,9 @@ R6RS. @xref{R6RS Incompatibilities} in the manual." "Make changes to the default environment to better conform to the R7RS." (install-r6rs!) + (set! %load-extensions + (cons* ".guile.sld" ".sld" + (delete ".guile.sld" (delete ".sld" (delete ".guile.sls" (delete ".sls" %load-extensions)))))) (read-enable 'r7rs-symbols)) |