diff --git a/compiler-lib/compiler/decompile.rkt b/compiler-lib/compiler/decompile.rkt index e4f22e5954..d410854ee8 100644 --- a/compiler-lib/compiler/decompile.rkt +++ b/compiler-lib/compiler/decompile.rkt @@ -178,10 +178,7 @@ (cond [(symbol? modidx) modidx] [else - (collapse-module-path-index modidx (build-path - (or (current-load-relative-directory) - (current-directory)) - "here.rkt"))])) + (collapse-module-path-index modidx)])) (define (decompile-module mod-form orig-stack stx-ht mod-name) (match mod-form