(define (foo ...) ...) actually gives the lambda a name
authorAndy Wingo <wingo@pobox.com>
Fri, 12 Sep 2008 21:11:09 +0000 (23:11 +0200)
committerAndy Wingo <wingo@pobox.com>
Sat, 13 Sep 2008 12:19:20 +0000 (14:19 +0200)
commit5dcf8f3555d8a96cc0c028f50c12968a4e238506
tree16dc8bb3597bd8658affc4d97fed0832630ae614
parent6cdcb824f046cf1e12f0dd6696cd44c89c2e975b
(define (foo ...) ...) actually gives the lambda a name

* module/language/scheme/translate.scm (primitive-syntax-table): In forms
  like (define x y) where y is a lambda, and the lambda has no name yet,
  set the lambda's name in its metadata.
module/language/scheme/translate.scm