Revert "suppress duplicate definition warnings, variables are hoisted"

This reverts commit 15e95f82da.
This commit is contained in:
Yuichi Nishiwaki 2014-02-08 03:12:39 +09:00
parent f051de77c5
commit 968c0b53df
1 changed files with 2 additions and 2 deletions

View File

@ -42,8 +42,8 @@
(cons (r 'lambda) (cons (map car bindings) body)))
(cons name (map cadr bindings))))
(begin
(set! bindings (cadr expr))
(set! body (cddr expr))
(define bindings (cadr expr))
(define body (cddr expr))
(cons (cons (r 'lambda) (cons (map car bindings) body))
(map cadr bindings)))))))