From 6e0c1b045c840cdeb5228e645f9ca6264d3a8bf8 Mon Sep 17 00:00:00 2001
From: alice maz <alice@alicemaz.com>
Date: Thu, 6 Aug 2020 17:46:52 -0500
Subject: [PATCH] use C_CHICKEN_INSTALL_PROGRAM for egg cache name
---
egg-environment.scm | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/egg-environment.scm b/egg-environment.scm
index 50ea972a..3be23608 100644
a
|
b
|
EOF |
43 | 43 | (define cross-chicken (feature? #:cross-chicken)) |
44 | 44 | (define binary-version (foreign-value "C_BINARY_VERSION" int)) |
45 | 45 | (define major-version (foreign-value "C_MAJOR_VERSION" int)) |
| 46 | (define chicken-install-program (foreign-value "C_CHICKEN_INSTALL_PROGRAM" c-string)) |
46 | 47 | |
47 | 48 | (define default-cc (foreign-value "C_TARGET_CC" c-string)) |
48 | 49 | (define default-cxx (foreign-value "C_TARGET_CXX" c-string)) |
… |
… |
EOF |
120 | 121 | (or (get-environment-variable "CHICKEN_EGG_CACHE") |
121 | 122 | (make-pathname (or (system-cache-directory) |
122 | 123 | (current-directory)) |
123 | | "chicken-install"))) |
| 124 | chicken-install-program))) |