raco exe: attempt to fix problem with room made for runtime-paths table

This commit is contained in:
Matthew Flatt 2014-04-29 06:18:55 -06:00
parent ae14ff70df
commit 07e390302c

View File

@ -1193,8 +1193,11 @@
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
(bytes-append #"................." program-name-bytes)))
;; room likely needed by the distribution-mangler.
;; The extra "."s are meant to cover the relative
;; path (even in Windows format) to runtime files,
;; and the program name is also part of that path.
(bytes-append (make-bytes 32 (char->integer #\.)) program-name-bytes)))
(mod-runtime-paths nc)
(mod-runtime-module-syms nc)))
runtimes))])