This is the mail archive of the guile@cygnus.com mailing list for the guile project.
Index Nav: | [Date Index] [Subject Index] [Author Index] [Thread Index] | |
---|---|---|
Message Nav: | [Date Prev] [Date Next] | [Thread Prev] [Thread Next] |
I installed the SLIB files in /usr/local/share/guile/slib (my guile [the 971112 snapshot] is compiled with a --prefix of /usr/local). I expected that to just work, but it seems to fail on any require, even though it is finding the location of the files OK. The backtrace makes me think that the .scm suffix is not being appended properly to files that are given to slib:load with no extension. - Maciej guile> (use-modules (ice-9 slib)) guile> (require 'random) ERROR: In procedure gsubr-apply in expression (@apply fun (apply:nconc2last args)): ERROR: No such file or directory: "/usr/local/share/guile/slib/mklibcat" ABORT: (system-error) Type "(backtrace)" to get more information. guile> (backtrace) Backtrace: 0* [require:require random] 1 (or (require:provided? feature) (let (#) (cond #) ...)) 2* [require:provided? random] 3 (if (symbol? feature) (if (memq feature *features*) #t ...) ...) ... 4 (let ((path #)) (cond (# #) (# #t) ...)) 5* [catalog:get random] 6* (if (not *catalog*) (let (#) (cond #) ...)) 7 (let ((slibcat #)) (cond (# # #)) ...) 8* (cond ((or # #) (slib:load #) (set! slibcat #))) 9* [#<procedure (<pathname> . extra)> "/usr/local/share/guile/slib/mklibcat"] 10 (let ((old-load-pathname *load-pathname*)) (set! *load-pathname* <pathname>) ...) 11* [apply #<procedure slib:load (name)> ("/usr/local/share/guile/slib/mklibcat")] 12 [slib:load "/usr/local/share/guile/slib/mklibcat"] ... 13 [dynamic-wind #<procedure ()> #<procedure ()> ...] 14* [#<procedure ()>] 15* (let ((errinfo #)) (if (and errinfo #) (apply throw errinfo))) 16 (if (and errinfo (catch # # ...)) (apply throw errinfo)) ... 17 [apply #<compiled-closure #<primitive-procedure gsubr-apply>> (system-error "open-file" "%s: %S" ...)] 18* [gsubr-apply #<compiled-closure #<primitive-procedure gsubr-apply>> system-error ...] Type "(debug-enable 'backtrace)" if you would like a backtrace automatically if an error occurs in the future.