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

fix another renaming provide src loc

Browse Source
This commit is contained in:
Stephen Chang 2016-07-21 16:52:53 -04:00
parent 64a1209bb5
commit 99dd403ef6
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
racket/collects/racket/private/reqprov.rkt
View File

@ -333,9 +333,10 @@
#`(just-meta
#,(import-orig-mode import)
#,(mode-wrap (phase+ base-mode (import-req-mode import))
#`(rename #,(import-src-mod-path import)
(quasisyntax/loc in
(rename #,(import-src-mod-path import)
#,(import-local-id import)
#,(import-src-sym import)))))
#,(import-src-sym import))))))
imports)
(map (lambda (src)
(mode-wrap (phase+ base-mode (import-source-mode src))