1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-09 13:30:26 +02:00

(rec): Add missing `error' to else clause.

This commit is contained in:
Kevin Ryde 2004-08-27 01:18:56 +00:00
parent 1df6de9637
commit cd184501da

View file

@ -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)))))