Revert "suppress duplicate definition warnings, variables are hoisted"
This reverts commit 15e95f82da
.
This commit is contained in:
parent
f051de77c5
commit
968c0b53df
|
@ -42,8 +42,8 @@
|
||||||
(cons (r 'lambda) (cons (map car bindings) body)))
|
(cons (r 'lambda) (cons (map car bindings) body)))
|
||||||
(cons name (map cadr bindings))))
|
(cons name (map cadr bindings))))
|
||||||
(begin
|
(begin
|
||||||
(set! bindings (cadr expr))
|
(define bindings (cadr expr))
|
||||||
(set! body (cddr expr))
|
(define body (cddr expr))
|
||||||
(cons (cons (r 'lambda) (cons (map car bindings) body))
|
(cons (cons (r 'lambda) (cons (map car bindings) body))
|
||||||
(map cadr bindings)))))))
|
(map cadr bindings)))))))
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue