~ chicken-core (chicken-5) 0ae333805f8fc782d4cdc36e1f3675028a26d9fa

commit 0ae333805f8fc782d4cdc36e1f3675028a26d9fa
Author:     felix <felix@call-with-current-continuation.org>
AuthorDate: Sat Aug 18 10:45:57 2018 +0200
Commit:     Kooda <kooda@upyum.com>
CommitDate: Sun Aug 19 11:57:44 2018 +0200

    chicken-install: allow any type of value when converting program arguments
    
    (Suggested by Joerg Wittenberger)
    
    Signed-off-by: Kooda <kooda@upyum.com>

diff --git a/egg-compile.scm b/egg-compile.scm
index 4b6c3cea..8e338541 100644
--- a/egg-compile.scm
+++ b/egg-compile.scm
@@ -921,7 +921,8 @@ EOF
   (make-pathname dir (->string name)))
 
 (define (quotearg str)
-  (let ((lst (string->list str)))
+  (let* ((str (->string str))
+         (lst (string->list (->string str))))
     (if (any char-whitespace? lst)
         (string-append "\"" str "\"")
         str)))