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

share submodules of racket/base and scheme/base

Browse Source 
for user code
This commit is contained in:
Robby Findler 2013-05-08 07:25:03 -05:00
parent 36e40ed340
commit 5290b4c4b3
1 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
collects/drracket/private/eval.rkt
View File

@ -185,7 +185,12 @@
(define to-be-copied-module-specs (define to-be-copied-module-specs
(list ''#%foreign (list ''#%foreign
'(lib "mzlib/pconvert-prop.rkt") '(lib "mzlib/pconvert-prop.rkt")
'(lib "planet/terse-info.rkt"))) '(lib "planet/terse-info.rkt")
;; preserve the invariant that:
;; if a module is shared, so
;; are all of its submodules
'(submod racket/base reader)
'(submod scheme/base reader)))
;; ensure that they are all here. ;; ensure that they are all here.
(for-each (λ (x) (dynamic-require x #f)) to-be-copied-module-specs) (for-each (λ (x) (dynamic-require x #f)) to-be-copied-module-specs)