racket/rerequire: repair for Racket CS
This commit is contained in:
parent
5f53c91c6e
commit
f5836d7a30
|
@ -49,7 +49,8 @@
|
||||||
;; submodule is not found
|
;; submodule is not found
|
||||||
(void))])
|
(void))])
|
||||||
(let* ([code (get-module-code
|
(let* ([code (get-module-code
|
||||||
path "compiled"
|
path (let ([l (use-compiled-file-paths)])
|
||||||
|
(if (pair? l) (car l) "compiled"))
|
||||||
(lambda (e)
|
(lambda (e)
|
||||||
(parameterize ([compile-enforce-module-constants #f])
|
(parameterize ([compile-enforce-module-constants #f])
|
||||||
(compile e)))
|
(compile e)))
|
||||||
|
|
Loading…
Reference in New Issue
Block a user