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

turning off the preservation enabled: ineffective for shrinking size

Browse Source
This commit is contained in:
Danny Yoo 2011-09-28 14:26:20 -04:00
parent b7489b5b0c
commit a76c8142bc
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
get-module-bytecode.rkt
View File

@ -81,7 +81,7 @@
(lambda (ip)
(get-compiled-code-from-port ip)))
)])
(parameterize ([compile-context-preservation-enabled #t])
(parameterize ([compile-context-preservation-enabled #f])
(get-module-code p))))
@ -90,7 +90,7 @@
(define (get-compiled-code-from-port ip)
;(printf "get-compiled-code-from-port\n")
(parameterize ([read-accept-reader #t]
[compile-context-preservation-enabled #t]
[compile-context-preservation-enabled #f]
[current-namespace base-namespace])
(define stx (read-syntax (object-name ip) ip))
;(printf "got stx; now expanding out the images\n")