diff options
| author | Arun Isaac | 2021-11-29 19:01:36 +0530 |
|---|---|---|
| committer | Arun Isaac | 2021-11-29 19:44:18 +0530 |
| commit | 7182d280779a14c2f7a991f6f229e4c0d123435f (patch) | |
| tree | 20dd285b71cc49ff72244b6050b4b93e98f4f6c5 | |
| parent | c823ee4367378738c2dae5e9426430ab4bcdfd79 (diff) | |
| download | ccwl-7182d280779a14c2f7a991f6f229e4c0d123435f.tar.gz ccwl-7182d280779a14c2f7a991f6f229e4c0d123435f.tar.lz ccwl-7182d280779a14c2f7a991f6f229e4c0d123435f.zip | |
guix.scm: Add a wrap phase.
* guix.scm (ccwl)[arguments]: Import target-guile-effective-version
from (guix build guile-build-system). Add a wrap phase.
| -rw-r--r-- | guix.scm | 20 |
1 files changed, 19 insertions, 1 deletions
@@ -53,7 +53,25 @@ #:select? (git-predicate %source-dir))) (build-system gnu-build-system) (arguments - '(#:make-flags '("GUILE_AUTO_COMPILE=0"))) ; to prevent guild warnings + `(#:make-flags '("GUILE_AUTO_COMPILE=0") ; to prevent guild warnings + #:modules (((guix build guile-build-system) + #:select (target-guile-effective-version)) + ,@%gnu-build-system-modules) + #:imported-modules ((guix build guile-build-system) + ,@%gnu-build-system-modules) + #:phases + (modify-phases %standard-phases + (add-after 'install 'wrap + (lambda* (#:key inputs outputs #:allow-other-keys) + (let ((out (assoc-ref outputs "out")) + (effective-version (target-guile-effective-version))) + (wrap-program (string-append out "/bin/ccwl") + `("GUILE_LOAD_PATH" prefix + (,(string-append out "/share/guile/site/" effective-version) + ,(getenv "GUILE_LOAD_PATH"))) + `("GUILE_LOAD_COMPILED_PATH" prefix + (,(string-append out "/lib/guile/" effective-version "/site-ccache") + ,(getenv "GUILE_LOAD_COMPILED_PATH")))))))))) (inputs `(("guile" ,guile-3.0) ("guile-libyaml" ,guile-libyaml))) |