From 408a8cb79ed561a0cd3f30be74d71030da5db202 Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Tue, 27 Feb 2018 20:10:03 -0700 Subject: [PATCH] compiler/cm: repair for chained compiled-file roots --- racket/collects/compiler/private/cm-minimal.rkt | 1 + 1 file changed, 1 insertion(+) diff --git a/racket/collects/compiler/private/cm-minimal.rkt b/racket/collects/compiler/private/cm-minimal.rkt index 8e218c56b6..a5a54077e5 100644 --- a/racket/collects/compiler/private/cm-minimal.rkt +++ b/racket/collects/compiler/private/cm-minimal.rkt @@ -339,6 +339,7 @@ path (get-module-code path (path->mode path) compile (lambda (a b) #f) ; extension handler + #:roots (list (car roots)) #:source-reader read-src-syntax)))) (define dest-roots (list (car roots))) (define-values (code-dir code-name)