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

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>
This commit is contained in:
Nguyễn Thái Ngọc Duy 2020-02-15 06:46:07 +07:00 committed by Ludovic Courtès
parent cacf690d91
commit cefbfac520

View file

@ -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))