From 135161ba350f42db65018bdebfbf4dffcb8b64aa Mon Sep 17 00:00:00 2001 From: Charles Date: Tue, 19 Oct 2021 23:42:01 -0500 Subject: [PATCH 1/4] gnu: Add cl-rutils-untested. * gnu/packages/lisp-xyz.scm (cl-rutils/untested sbcl-rutils/untested ecl-rutils/untested): New variables. --- gnu/packages/lisp-xyz.scm | 43 +++++++++++++++++++++++++++++++++++++++ 1 file changed, 43 insertions(+) diff --git a/gnu/packages/lisp-xyz.scm b/gnu/packages/lisp-xyz.scm index 9694f6adda..9b383b6d6d 100644 --- a/gnu/packages/lisp-xyz.scm +++ b/gnu/packages/lisp-xyz.scm @@ -7736,6 +7736,49 @@ (define-public cl-serapeum (define-public ecl-serapeum (sbcl-package->ecl-package sbcl-serapeum)) +(define-public sbcl-rutils/untested + (let ((commit "db3c3f4ae897025b5f0cd81042ca147da60ca0c5") + (revision "0")) + (package + (name "sbcl-rutils-untested") + (version (git-version "5.2.1" revision commit)) + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/vseloved/rutils") + (commit commit))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "1d2whscknh1zga2vdqvfqri8wx0gnml3sfqz62igq0ppap6q07y3")))) + (build-system asdf-build-system/sbcl) + (arguments + '(#:tests? #f + #:asd-systems (list "rutils") + #:phases + (modify-phases %standard-phases + (add-after 'unpack 'fix-build + (lambda _ + (for-each delete-file + (list "rutils-test.asd" + "rutilsx.asd" + "rutilsx-test.asd")) + #t))))) + (inputs + `(("closer-mop" ,sbcl-closer-mop) + ("named-readtables" ,sbcl-named-readtables))) + (home-page "https://github.com/vseloved/rutils") + (synopsis "Radical Utilities for Common Lisp") + (description "RUTILS is a syntactic utilities package for Common Lisp.") + (license license:expat)))) + +(define-public cl-rutils/untested + (sbcl-package->cl-source-package sbcl-rutils/untested)) + +(define-public ecl-rutils/untested + (sbcl-package->ecl-package sbcl-rutils/untested)) + (define-public sbcl-arrows (let ((commit "df7cf0067e0132d9697ac8b1a4f1b9c88d4f5382") (revision "0")) -- 2.33.0