raco exe: normalize runtime-file paths

Normalization is needed to ensure that `raco dist` doesn't generate
longer paths (by converting a "/" to "\\", for example) in its
path manipulations.
This commit is contained in:
Matthew Flatt 2014-04-30 13:49:17 -06:00
parent a8fc2d5ec9
commit 0c9685d136

View File

@ -1188,10 +1188,11 @@
(and p
(if (symbol? p)
p
(path->bytes
(if (absolute-path? p)
p
(build-path (path-only (mod-file nc)) p))))))
(path->bytes
(simplify-path
(if (absolute-path? p)
p
(build-path (path-only (mod-file nc)) p)))))))
;; As for the extension table, a placeholder to save
;; room likely needed by the distribution-mangler.
;; The extra "."s are meant to cover the relative