* srfi-31 rec error
@ 2004-08-27 1:17 Kevin Ryde
0 siblings, 0 replies; only message in thread
From: Kevin Ryde @ 2004-08-27 1:17 UTC (permalink / raw)
[-- Attachment #1: Type: text/plain, Size: 295 bytes --]
* srfi-31.scm (rec): Add missing `error' to else clause.
Currently a bogus usage like "(rec #:foo)" results in an infinite
macro expansion loop (because the define-macro returns the same rec
form as it was given). I'm assuming the message string is meant to be
part of an error call.
[-- Attachment #2: srfi-31.scm.error.diff --]
[-- Type: text/plain, Size: 384 bytes --]
--- srfi-31.scm.~1.3.~ 2004-07-05 09:59:56.000000000 +1000
+++ srfi-31.scm 2004-08-26 17:23:17.000000000 +1000
@@ -31,4 +31,5 @@
((list? arg-form)
`(letrec ((,(car arg-form) (lambda ,(cdr arg-form) ,@body)))
,(car arg-form)))
- (else "syntax error in rec form" `(rec ,arg-form ,@body))))
+ (else
+ (error "syntax error in rec form" `(rec ,arg-form ,@body)))))
[-- Attachment #3: Type: text/plain, Size: 143 bytes --]
_______________________________________________
Guile-devel mailing list
Guile-devel@gnu.org
http://lists.gnu.org/mailman/listinfo/guile-devel
^ permalink raw reply [flat|nested] only message in thread
only message in thread, other threads:[~2004-08-27 1:17 UTC | newest]
Thread overview: (only message) (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2004-08-27 1:17 srfi-31 rec error 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).