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

expander: fix flattener in machine-independent mode

Browse Source
This commit is contained in:
Matthew Flatt 2019-01-26 16:41:42 -07:00
parent c9e3788d42
commit 737ee9eba5
1 changed files with 5 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
racket/src/expander/run.rkt
View File

@ -205,6 +205,11 @@
;; Avoid use of ".zo" files: ;; Avoid use of ".zo" files:
(use-compiled-file-paths null) (use-compiled-file-paths null)
;; In case the host is in machine-independent mode, claim
;; machine-specific so the expander doesn't skip our extracting
;; linklet compiler:
(current-compile-target-machine (system-type 'target-machine))
;; Redirect module search to another installation: ;; Redirect module search to another installation:
(when checkout-directory (when checkout-directory
(let ([l (list (build-path checkout-directory "collects"))]) (let ([l (list (build-path checkout-directory "collects"))])