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

compile mzc-generated module wrapper without enforced constants

Browse Source 
svn: r3147
This commit is contained in:
Matthew Flatt 2006-05-31 11:41:27 +00:00
parent ce14423968
commit b36a057d75
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
collects/compiler/private/driver.ss
View File

@ -698,7 +698,8 @@
(let ([core-thunk (let ([core-thunk
(lambda () (lambda ()
(parameterize ([current-namespace elaborate-namespace] (parameterize ([current-namespace elaborate-namespace]
[current-load-relative-directory input-directory]) [current-load-relative-directory input-directory]
[compile-enforce-module-constants #f])
(let ([sources+bytecodes+magics (let ([sources+bytecodes+magics
(map (lambda (src) (map (lambda (src)
(let-values ([(src bytecode magic-sym) (let-values ([(src bytecode magic-sym)