Ticket #1713: install-cache.patch

File install-cache.patch, 1.1 KB (added by alicemaz, 22 months ago)
  • egg-environment.scm

    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 
    4343(define cross-chicken (feature? #:cross-chicken))
    4444(define binary-version (foreign-value "C_BINARY_VERSION" int))
    4545(define major-version (foreign-value "C_MAJOR_VERSION" int))
     46(define chicken-install-program (foreign-value "C_CHICKEN_INSTALL_PROGRAM" c-string))
    4647
    4748(define default-cc (foreign-value "C_TARGET_CC" c-string))
    4849(define default-cxx (foreign-value "C_TARGET_CXX" c-string))
    EOF 
    120121  (or (get-environment-variable "CHICKEN_EGG_CACHE")
    121122      (make-pathname (or (system-cache-directory)
    122123                         (current-directory))
    123                      "chicken-install")))
     124                     chicken-install-program)))