unofficial mirror of guile-devel@gnu.org 
 help / color / mirror / Atom feed
From: Jan Nieuwenhuizen <janneke@gnu.org>
Cc: Han-Wen Nienhuys <hanwen@cs.uu.nl>
Subject: (ice-9 slib) and system in CVS HEAD
Date: Tue, 06 Jul 2004 00:29:22 +0200	[thread overview]
Message-ID: <87u0wm9jgd.fsf@peder.flower> (raw)


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


             reply	other threads:[~2004-07-05 22:29 UTC|newest]

Thread overview: 4+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2004-07-05 22:29 Jan Nieuwenhuizen [this message]
2004-07-06 22:05 ` (ice-9 slib) and system in CVS HEAD Kevin Ryde
2004-07-06 23:07   ` Jan Nieuwenhuizen
2004-07-07  0:36     ` Kevin Ryde

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

  List information: https://www.gnu.org/software/guile/

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=87u0wm9jgd.fsf@peder.flower \
    --to=janneke@gnu.org \
    --cc=hanwen@cs.uu.nl \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
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).