sync xform with `racket' collection changes
This commit is contained in:
parent
69a3239c59
commit
8c976978ed
|
@ -101,7 +101,7 @@
|
||||||
(namespace-attach-module old-namespace ''#%builtin)
|
(namespace-attach-module old-namespace ''#%builtin)
|
||||||
(parameterize ([use-compiled-file-paths (list "compiled")])
|
(parameterize ([use-compiled-file-paths (list "compiled")])
|
||||||
(parameterize ([current-load/use-compiled (mk-cm)])
|
(parameterize ([current-load/use-compiled (mk-cm)])
|
||||||
(namespace-require 'scheme/base)
|
(namespace-require 'racket/base)
|
||||||
|
|
||||||
(dynamic-require 'xform/xform-mod (void))))))
|
(dynamic-require 'xform/xform-mod (void))))))
|
||||||
|
|
||||||
|
|
|
@ -93,7 +93,7 @@
|
||||||
(lambda ()
|
(lambda ()
|
||||||
(close-output-port (open-output-file lock-file 'error)))
|
(close-output-port (open-output-file lock-file 'error)))
|
||||||
(lambda ()
|
(lambda ()
|
||||||
(namespace-require 'scheme/base)
|
(namespace-require 'racket/base)
|
||||||
(load (build-path here-dir "setup.rkt"))
|
(load (build-path here-dir "setup.rkt"))
|
||||||
void)
|
void)
|
||||||
(lambda ()
|
(lambda ()
|
||||||
|
|
Loading…
Reference in New Issue
Block a user