~ chicken-core (chicken-5) d921c0459c165b091b3d48d81d37ffa33ea1e237
commit d921c0459c165b091b3d48d81d37ffa33ea1e237
Author: felix <felix@call-with-current-continuation.org>
AuthorDate: Tue Sep 7 10:12:36 2021 +0200
Commit: felix <felix@call-with-current-continuation.org>
CommitDate: Thu Sep 9 11:03:00 2021 +0200
Ensure platform identifier is used when determining install command for files on windows
Previously the defaults from chicken-config.h where used, but
depending on the shell used during installation, this may be a UNIX
command if the MSYS shell was used.
Thanks to Mark Fisher for his tremendous help in fixing this bug.
Signed-off-by: Mario Domenech Goulart <mario@parenteses.org>
diff --git a/egg-compile.scm b/egg-compile.scm
index 205505a6..dd2e8103 100644
--- a/egg-compile.scm
+++ b/egg-compile.scm
@@ -80,18 +80,29 @@
((unix) "cp -r")
((windows) "xcopy /y /i /e")))
+(define (copy-file-command platform)
+ (case platform
+ ((unix) "cp")
+ ((windows) "copy /y")))
+
(define (mkdir-command platform)
(case platform
((unix) "mkdir -p")
((windows) "mkdir")))
(define (install-executable-command platform)
- (string-append default-install-program " "
- default-install-program-executable-flags))
+ (case platform
+ ((windows) (copy-file-command 'windows))
+ (else
+ (string-append default-install-program " "
+ default-install-program-executable-flags))))
(define (install-file-command platform)
- (string-append default-install-program " "
- default-install-program-data-flags))
+ (case platform
+ ((windows) (copy-file-command 'windows))
+ (else
+ (string-append default-install-program " "
+ default-install-program-data-flags))))
(define (remove-file-command platform)
(case platform
diff --git a/manual/Acknowledgements b/manual/Acknowledgements
index 0489a0eb..fcaaa92f 100644
--- a/manual/Acknowledgements
+++ b/manual/Acknowledgements
@@ -17,7 +17,7 @@ Forero Cuervo, Peter Danenberg, Linh Dang, Brian Denheyer, Sean
D'Epagnier, "dgym", "Don", Chris Double, "Brown Dragon", David
Dreisigmeyer, Jarod Eells, Petter Egesund, Stephen Eilert, Steve
Elkins, Daniel B. Faken, Erik Falor, Will Farr, Graham Fawcett, Marc
-Feeley, "Fizzie", Matthew Flatt, Kimura Fuyuki, Tony Garnock-Jones,
+Feeley, Mark Fisher, "Fizzie", Matthew Flatt, Kimura Fuyuki, Tony Garnock-Jones,
Martin Gasbichler, Abdulaziz Ghuloum, Joey Gibson, Stephen C. Gilardi,
Mario Domenech Goulart, Joshua Griffith, Johannes Groedem, Damian
Gryski, Matt Gushee, Andreas Gustafsson, Sven Hartrumpf, Jun-ichiro
Trap