From: Marco Maggi <marco.maggi-ipsu@poste.it>
To: guile-user@gnu.org
Subject: [r6rs] expansion bug, probably free-identifier=? related
Date: Mon, 28 Feb 2011 07:56:10 +0100 [thread overview]
Message-ID: <8739n8y7ed.fsf@rapitore.luna> (raw)
The following little package:
<http://github.com/downloads/marcomaggi/nausicaa/synrec6-1.0.1.tar.gz>
works with Larceny, Mosh, Petite Chez, Racket, Vicare and
Ypsilon; with Guile 2.0 it fails with:
GUILE_LOAD_PATH=.: guile -l guile-r6rs-setup.scm --auto-compile -s ./test-flatt-syntactic.sps; GUILE_LOAD_PATH=.: guile -l guile-r6rs-setup.scm --auto-compile -s ./test-synrec6.sps;
;;; note: auto-compilation is enabled, set GUILE_AUTO_COMPILE=0
;;; or pass the --no-auto-compile argument to disable.
;;; compiling /home/marco/src/devel/scheme/icaro/src/standalone/synrec6/./test-flatt-syntactic.sps
;;; WARNING: compilation of /home/marco/src/devel/scheme/icaro/src/standalone/synrec6/./test-flatt-syntactic.sps failed:
;;; key r6rs:exception, throw_args (#<r6rs:record:&raise-object-wrapper>)
Backtrace:
In module/ice-9/boot-9.scm:
170: 13 [catch #t #<catch-closure 822a5d0> ...]
In unknown file:
?: 12 [catch-closure]
In module/ice-9/boot-9.scm:
62: 11 [call-with-prompt prompt0 ...]
In module/ice-9/eval.scm:
389: 10 [eval # #]
In module/ice-9/boot-9.scm:
1917: 9 [save-module-excursion #<procedure 80a2320 at module/ice-9/boot-9.scm:3341:3 ()>]
3348: 8 [#<procedure 80a2320 at module/ice-9/boot-9.scm:3341:3 ()>]
1189: 7 [%start-stack load-stack ...]
1194: 6 [#<procedure 8723ac8 ()>]
In unknown file:
?: 5 [primitive-load "/home/marco/src/devel/scheme/icaro/src/standalone/synrec6/./test-flatt-syntactic.sps"]
In module/ice-9/eval.scm:
458: 4 [#<procedure 813b680 at module/ice-9/eval.scm:452:4 (exp)> #]
In module/ice-9/psyntax.scm:
1066: 3 [chi-top (six.define-record-type # # #) () (#) ...]
1007: 2 [syntax-type (six.define-record-type # # #) () (#) ...]
1303: 1 [chi-macro #<procedure 8704ab0 (stx)> (six.define-record-type # # #) () ...]
In unknown file:
?: 0 [#<procedure 8704ab0 (stx)> #(syntax-object # # #)]
ERROR: In procedure #<procedure 8704ab0 (stx)>:
ERROR: ERROR: R6RS exception:
1. &who: define-record-type
2. &message: "invalid clause in record type definition"
3. &syntax:
form: (six.define-record-type (point make-point point?) (six.fields (six.immutable x point-x) (six.mutable y point-y set-point-y!)) (six.nongenerative point-4893d957-e00b-11d9-817f-00111175eb9e))
subform: (six.fields (six.immutable x point-x) (six.mutable y point-y set-point-y!))
Some deprecated features have been used. Set the environment
variable GUILE_WARN_DEPRECATED to "detailed" and rerun the
program to get more information. Set it to "no" to suppress
this message.
--
Marco Maggi
next reply other threads:[~2011-02-28 6:56 UTC|newest]
Thread overview: 3+ messages / expand[flat|nested] mbox.gz Atom feed top
2011-02-28 6:56 Marco Maggi [this message]
2011-02-28 22:22 ` [r6rs] expansion bug, probably free-identifier=? related Andy Wingo
2011-04-29 14:56 ` Andy Wingo
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=8739n8y7ed.fsf@rapitore.luna \
--to=marco.maggi-ipsu@poste.it \
--cc=guile-user@gnu.org \
/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).