mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-28 16:00:22 +02:00
Code Activity

* slib.scm (slib:load): Use primitive-load-path instead of

Browse source 
basic-load.  This is probably wrong, but hopefully the entire
source access system will be revised soon anyway, and this will
make require behave more like Emacs Lisp's require.  If this
breaks something, please let me know.  Maybe this is real dumb.
This commit is contained in:
Jim Blandy 1997-05-30 18:13:10 +00:00
parent 59b8e23bf3
commit e37e4bca97
1 changed files with 3 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

5
ice-9/slib.scm
View file

@ -113,13 +113,14 @@
(set-current-module slib-module)
(let* ((errinfo (catch 'system-error
(lambda ()
(basic-load name)
(primitive-load-path name)
#f)
(lambda args args)))
(errinfo (and errinfo
(catch 'system-error
(lambda ()
(basic-load (string-append name ".scm"))
(primitive-load-path
(string-append name ".scm"))
#f)
(lambda args args)))))
(if errinfo