conservatory
/
picrin
4
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Revert "Revert "suppress duplicate definition warnings, variables are hoisted"" 

This reverts commit 968c0b53df.
This commit is contained in:
Yuichi Nishiwaki 2014-02-08 03:18:13 +09:00
parent b0d955c771
commit b6637842e7
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
piclib/built-in.scm
View File

@ -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
(define bindings (cadr expr)) (set! bindings (cadr expr))
(define body (cddr expr)) (set! 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)))))))