mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-05-28 16:00:22 +02:00
(rec): Add missing `error' to else clause.
And fix heading comment.
This commit is contained in:
parent
830ea8d039
commit
56d545b793
1 changed files with 3 additions and 2 deletions
|
@ -1,4 +1,4 @@
|
|||
;;; srfi-34.scm --- Time/Date Library
|
||||
;;; srfi-31.scm --- special form for recursive evaluation
|
||||
|
||||
;; Copyright (C) 2004 Free Software Foundation, Inc.
|
||||
;;
|
||||
|
@ -54,4 +54,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)))))
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue