suzanne.soy/gui
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

added local

Browse Source 
original commit: 4504678bd78a0175ad003ec892cc27885ca75b90
This commit is contained in:
Robby Findler 2010-06-20 21:59:30 -05:00
parent 66ad2795fd
commit f39e86aad3
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/framework/private/main.rkt
View File

@ -208,7 +208,7 @@
(let ([hash-table (make-hasheq)]) (let ([hash-table (make-hasheq)])
(for-each (λ (x) (for-each (λ (x)
(hash-set! hash-table x 'define)) (hash-set! hash-table x 'define))
'(local)) '(struct local))
(for-each (λ (x) (for-each (λ (x)
(hash-set! hash-table x 'begin)) (hash-set! hash-table x 'begin))
'(case-lambda '(case-lambda