From b6070420b2f4ef96a3f73987389b66aa0bbb1e7b Mon Sep 17 00:00:00 2001 From: Arun Isaac Date: Tue, 30 Sep 2025 18:56:08 +0100 Subject: guix: Depend on guile-chibi-match. --- .guix/run64-package.scm | 24 ++++++++++++++++++++++-- 1 file changed, 22 insertions(+), 2 deletions(-) diff --git a/.guix/run64-package.scm b/.guix/run64-package.scm index be9332c..ec1099c 100644 --- a/.guix/run64-package.scm +++ b/.guix/run64-package.scm @@ -81,9 +81,29 @@ the experimental tree patterns.") (build-system gnu-build-system) (arguments (list #:make-flags #~(list (string-append "prefix=" #$output)) + #:modules `(((guix build guile-build-system) + #:select (target-guile-effective-version)) + ,@%default-gnu-imported-modules) #:phases - #~(modify-phases %standard-phases - (delete 'configure)))) + (with-imported-modules `((guix build guile-build-system) + ,@%default-gnu-imported-modules) + #~(modify-phases %standard-phases + (delete 'configure) + (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/guile-run64") + `("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 + (list guile-3.0 + guile-chibi-match)) (home-page "https://run64.systemreboot.net") (synopsis "SRFI-64 test runner for Scheme") (description "run64 is a SRFI-64 test runner for Scheme.") -- cgit 1.4.1