summaryrefslogtreecommitdiff
path: root/srfi/srfi-31.scm
diff options
context:
space:
mode:
authorKevin Ryde <user42@zip.com.au>2004-08-27 01:18:56 +0000
committerKevin Ryde <user42@zip.com.au>2004-08-27 01:18:56 +0000
commitcd184501da4a3a6a072a82f2fa5c5331ea1fa699 (patch)
tree8928be85a66381e831627bdf9d594321031d80a9 /srfi/srfi-31.scm
parent1df6de9637bd6f70ab4f894cf352fc7b3a894274 (diff)
downloadguile-cd184501da4a3a6a072a82f2fa5c5331ea1fa699.tar.gz
(rec): Add missing `error' to else clause.
Diffstat (limited to 'srfi/srfi-31.scm')
-rw-r--r--srfi/srfi-31.scm3
1 files changed, 2 insertions, 1 deletions
diff --git a/srfi/srfi-31.scm b/srfi/srfi-31.scm
index 69e5c0147..e74b9c909 100644
--- a/srfi/srfi-31.scm
+++ b/srfi/srfi-31.scm
@@ -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)))))