diff options
| author | Charles <charles.b.jackson@protonmail.com> | 2021-08-16 09:45:34 +0200 |
|---|---|---|
| committer | Guillaume Le Vaillant <glv@posteo.net> | 2021-08-16 10:01:26 +0200 |
| commit | 5d2853f4b2eddcce879ed285c96fa6e533148225 (patch) | |
| tree | c581ba2152cc175d137037f71a67ba8cbbd056a2 | |
| parent | 6fcaf8533792a64bc00292326f960561de591200 (diff) | |
| download | guix-5d2853f4b2eddcce879ed285c96fa6e533148225.tar guix-5d2853f4b2eddcce879ed285c96fa6e533148225.tar.gz | |
gnu: Add cl-yxorp-cli.
* gnu/packages/lisp-xyz.scm (cl-yxorp-cli): New variable.
Co-authored-by: Guillaume Le Vaillant <glv@posteo.net>
| -rw-r--r-- | gnu/packages/lisp-xyz.scm | 31 |
1 files changed, 31 insertions, 0 deletions
diff --git a/gnu/packages/lisp-xyz.scm b/gnu/packages/lisp-xyz.scm index e1d034a19c..06ce3c699e 100644 --- a/gnu/packages/lisp-xyz.scm +++ b/gnu/packages/lisp-xyz.scm @@ -57,6 +57,7 @@ #:use-module (guix hg-download) #:use-module (guix utils) #:use-module (guix build-system asdf) + #:use-module (guix build-system gnu) #:use-module (guix build-system trivial) #:use-module (gnu packages base) #:use-module (gnu packages c) @@ -18286,6 +18287,36 @@ language).") (define-public cl-yxorp (sbcl-package->cl-source-package sbcl-yxorp)) +(define-public cl-yxorp-cli + (package + (inherit sbcl-yxorp) + (name "cl-yxorp-cli") + (build-system gnu-build-system) + (arguments + '(#:tests? #f + #:strip-binaries? #f + #:phases + (modify-phases %standard-phases + (delete 'configure) + (add-after 'unpack 'set-home + (lambda _ + (setenv "HOME" "/tmp"))) + (replace 'build + (lambda _ + (invoke + "sbcl" "--noinform" + "--non-interactive" + "--no-userinit" + "--eval" "(require :asdf)" + "--eval" "(pushnew (uiop:getcwd) asdf:*central-registry*)" + "--load" "build.lisp"))) + (replace 'install + (lambda* (#:key outputs #:allow-other-keys) + (let ((bin (string-append (assoc-ref outputs "out") "/bin"))) + (mkdir-p bin) + (install-file "cl-yxorp" bin))))))) + (inputs (cons (list "sbcl" sbcl) (package-inputs sbcl-yxorp))))) + (define-public sbcl-rss ;; No release. (let ((commit "51d0145e91b86327ae5c36364f9c3048052e7a58")) |