~ chicken-core (chicken-5) 156cd99aa9e5c02c8293ba9ba49a4cb54d2bdc0c


commit 156cd99aa9e5c02c8293ba9ba49a4cb54d2bdc0c
Author:     Kooda <kooda@upyum.com>
AuthorDate: Wed May 2 21:02:51 2018 +0200
Commit:     Kooda <kooda@upyum.com>
CommitDate: Wed May 2 21:04:15 2018 +0200

    Tiny fixes for chicken-install on windows.

diff --git a/egg-compile.scm b/egg-compile.scm
index b42b1f1b..f0803008 100644
--- a/egg-compile.scm
+++ b/egg-compile.scm
@@ -769,6 +769,7 @@ EOF
 set PATH=~a;%PATH%
 set CHICKEN_CC=~a
 set CHICKEN_CXX=~a
+
 EOF
              default-bindir default-cc default-cxx))))
 
diff --git a/egg-environment.scm b/egg-environment.scm
index b225882b..63ea472f 100644
--- a/egg-environment.scm
+++ b/egg-environment.scm
@@ -107,7 +107,8 @@ EOF
 
 (define cache-directory
   (or (get-environment-variable "CHICKEN_EGG_CACHE")
-      (make-pathname (or (probe-dir (get-environment-variable "HOME"))
-                         (probe-dir (get-environment-variable "USERPROFILE"))
-                         (current-directory))
-                     ".chicken-install/cache")))
+      (make-pathname (list (or (probe-dir (get-environment-variable "HOME"))
+                               (probe-dir (get-environment-variable "USERPROFILE"))
+                               (current-directory))
+                           ".chicken-install")
+                     "cache")))
Trap