unofficial mirror of guile-devel@gnu.org 
 help / color / mirror / Atom feed
* (ice-9 slib) and system in CVS HEAD
@ 2004-07-05 22:29 Jan Nieuwenhuizen
  2004-07-06 22:05 ` Kevin Ryde
  0 siblings, 1 reply; 4+ messages in thread
From: Jan Nieuwenhuizen @ 2004-07-05 22:29 UTC (permalink / raw)
  Cc: Han-Wen Nienhuys


When using slib.scm after installing guile from CVS HEAD, I get:

$ guile --debug -c '(use-modules (ice-9 slib))'
Backtrace:
In unknown file:
   ?: 15  [try-load-module (ice-9 slib)]
   ?: 16  (or (begin (try-module-linked name)) (try-module-autoload name) ...)
   ?: 17* [try-module-autoload (ice-9 slib)]
   ?: 18  (let* (# # # #) (resolve-module dir-hint-module-name #f) (and # #))
    ...
   ?: 19  (letrec ((load-file #)) (dynamic-wind (lambda () #) (lambda () #) ...) ...)
   ?: 20* [dynamic-wind #<procedure #f ()> #<procedure #f ()> #<procedure #f ()>]
   ?: 21* [#<procedure #f ()>]
   ?: 22* (let* ((file #)) (cond (# => #) (# => #)))
   ?: 23  [#<procedure #f #> "/home/janneke/usr/pkg/guile/share/guile/1.7/ice-9/slib$
   ?: 24  [load-file #<primitive-procedure primitive-load> ...]
   ?: 25* [save-module-excursion #<procedure #f ()>]
   ?: 26  (let (# #) (dynamic-wind # thunk #))
   ?: 27  [dynamic-wind #<procedure #f ()> #<procedure #f ()> #<procedure #f ()>]
   ?: 28* [#<procedure #f ()>]
   ?: 29* [primitive-load "/home/janneke/usr/pkg/guile/share/guile/1.7/ice-9/slib.sc$
In /home/janneke/usr/pkg/guile/share/guile/1.7/ice-9/slib.scm:
 259: 30* (if (defined? #) (begin # #))
 260: 31  (define-public system (let (#) (lambda # #)))
 260: 32  (begin (define-private system (let* # #)) (eval-case (# #)))
In unknown file:
   ?: 33* (define-private system (let* (#) (lambda # #)))
In /home/janneke/usr/pkg/guile/share/guile/1.7/ice-9/slib.scm:
 261: 34* (let* ((guile-core-system system)) (lambda (str) (let (#) (or # #))))

/home/janneke/usr/pkg/guile/share/guile/1.7/ice-9/slib.scm:261:7: In expression (let* (#) (lambda # #)):
/home/janneke/usr/pkg/guile/share/guile/1.7/ice-9/slib.scm:261:7: Unbound variable: system

Am I missing something?  This works with 1.6.4.

Jan.

-- 
Jan Nieuwenhuizen <janneke@gnu.org> | GNU LilyPond - The music typesetter
http://www.xs4all.nl/~jantien       | http://www.lilypond.org


_______________________________________________
Guile-devel mailing list
Guile-devel@gnu.org
http://lists.gnu.org/mailman/listinfo/guile-devel


^ permalink raw reply	[flat|nested] 4+ messages in thread

end of thread, other threads:[~2004-07-07  0:36 UTC | newest]

Thread overview: 4+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2004-07-05 22:29 (ice-9 slib) and system in CVS HEAD Jan Nieuwenhuizen
2004-07-06 22:05 ` Kevin Ryde
2004-07-06 23:07   ` Jan Nieuwenhuizen
2004-07-07  0:36     ` Kevin Ryde

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).