1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-28 16:00:22 +02:00

(lambda*): Make sure that BODY is always put into a

real body context so that it can contain internal definitions.
Thanks to Matthias Köppe!
This commit is contained in:
Marius Vollmer 2001-06-09 18:14:22 +00:00
parent 269ce4390e
commit 1987c8ee57

View file

@ -294,7 +294,8 @@
`((if (not (null? ,rest-gensym))
(error "Too many arguments.")))
'())
,@BODY)))
(let ()
,@BODY))))
`(lambda (,@non-optional-args . ,(if rest-arg rest-arg '()))
,@BODY))))))