[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Guile-commits] 01/04: Accept .sld as scheme extensions in r7rs
From: |
Ludovic Courtès |
Subject: |
[Guile-commits] 01/04: Accept .sld as scheme extensions in r7rs |
Date: |
Sat, 7 Mar 2020 10:57:45 -0500 (EST) |
civodul pushed a commit to branch master
in repository guile.
commit cefbfac520e8552ae61207fde14a3fd5df87114b
Author: Nguyá»…n Thái Ngá»c Duy <address@hidden>
AuthorDate: Sat Feb 15 06:46:07 2020 +0700
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 <address@hidden>
---
module/ice-9/boot-9.scm | 3 +++
1 file changed, 3 insertions(+)
diff --git a/module/ice-9/boot-9.scm b/module/ice-9/boot-9.scm
index 004d139..0d37f3d 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))