On Sat, Sep 29, 2018 at 02:55:05PM +0200, Jörg F. Wittenberger wrote: > Hi all, > > commit bb6bf66b4bb6c16fedaf0aea55e965f9497f2885 > just undoes what commit 0ae333805f8fc782d4cdc36e1f3675028a26d9fa > introduced (argument to csc-options etc. being passed through ->string).
Actually it doesn't: notice the let* and the binding of str above the line that changed. > Commit dc07113cf79a1930c6a109c738138dbea15afbc0 throws this out completely. Yeah, my bad. Here's a patch to fix this. Cheers, Peter
From 1e247ff5e357786489184cae1fbdb335983171a6 Mon Sep 17 00:00:00 2001
From: Peter Bex <pe...@more-magic.net>
Date: Sat, 29 Sep 2018 15:18:41 +0200
Subject: [PATCH] chicken-install: Allow any type of value as argument
Reported by Joerg Wittenberger: we accidentally dropped the
functionality introduced by 0ae333805f8fc782d4cdc36e1f3675028a26d9fa
in dc07113cf79a1930c6a109c738138dbea15afbc0. This should fix that.
---
egg-compile.scm | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/egg-compile.scm b/egg-compile.scm
index e63caf93..9c1b9f82 100644
--- a/egg-compile.scm
+++ b/egg-compile.scm
@@ -921,7 +921,8 @@ EOF
;; backslashes on Windows, which is necessary in many cases when
;; running programs via "cmd".
(define (qs* arg platform #!optional slashify?)
- (let ((path (if slashify? (slashify arg platform) arg)))
+ (let* ((arg (->string arg))
+ (path (if slashify? (slashify arg platform) arg)))
(qs path (if (eq? platform 'windows) 'mingw32 platform))))
(define (slashify str platform)
--
2.11.0
signature.asc
Description: PGP signature
_______________________________________________ Chicken-hackers mailing list Chicken-hackers@nongnu.org https://lists.nongnu.org/mailman/listinfo/chicken-hackers
