1181 lines
41 KiB
Scheme
1181 lines
41 KiB
Scheme
;;; GNU Guix --- Functional package management for GNU
|
|
;;; Copyright © 2016, 2017 Andy Patterson <ajpatter@uwaterloo.ca>
|
|
;;; Copyright © 2018, 2020 Efraim Flashner <efraim@flashner.co.il>
|
|
;;; Copyright © 2018, 2019, 2020, 2021, 2022 Pierre Neidhardt <mail@ambrevar.xyz>
|
|
;;; Copyright © 2018 Pierre Langlois <pierre.langlois@gmx.com>
|
|
;;; Copyright © 2019 Tobias Geerinckx-Rice <me@tobias.gr>
|
|
;;; Copyright © 2019, 2020 Katherine Cox-Buday <cox.katherine.e@gmail.com>
|
|
;;; Copyright © 2019, 2020, 2021, 2022 Guillaume Le Vaillant <glv@posteo.net>
|
|
;;; Copyright © 2021, 2023 Sharlatan Hellseher <sharlatanus@gmail.com>
|
|
;;; Copyright © 2021 Charles Jackson <charles.b.jackson@protonmail.com>
|
|
;;; Copyright © 2022 jgart <jgart@dismail.de>
|
|
;;; Copyright © 2022, 2023 André A. Gomes <andremegafone@gmail.com>
|
|
;;; Copyright © 2023 Cage <cage-dev@twistfold.it>
|
|
;;;
|
|
;;; This file is part of GNU Guix.
|
|
;;;
|
|
;;; GNU Guix is free software; you can redistribute it and/or modify it
|
|
;;; under the terms of the GNU General Public License as published by
|
|
;;; the Free Software Foundation; either version 3 of the License, or (at
|
|
;;; your option) any later version.
|
|
;;;
|
|
;;; GNU Guix is distributed in the hope that it will be useful, but
|
|
;;; WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
;;; GNU General Public License for more details.
|
|
;;;
|
|
;;; You should have received a copy of the GNU General Public License
|
|
;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
|
|
|
|
;;; This module only contains Common Lisp libraries related to code testing
|
|
;;; facilities.
|
|
|
|
(define-module (gnu packages lisp-check)
|
|
#:use-module (gnu packages)
|
|
#:use-module ((guix licenses) #:prefix license:)
|
|
#:use-module (gnu packages lisp-xyz)
|
|
#:use-module (guix packages)
|
|
#:use-module (guix git-download)
|
|
#:use-module (guix build-system asdf))
|
|
|
|
(define-public sbcl-1am
|
|
(let ((commit "8b1da94eca4613fd8a20bdf63f0e609e379b0ba5"))
|
|
(package
|
|
(name "sbcl-1am")
|
|
(version (git-version "0.0" "1" commit))
|
|
(source
|
|
(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/lmj/1am")
|
|
(commit commit)))
|
|
(file-name (git-file-name name version))
|
|
(sha256
|
|
(base32
|
|
"05ss4nz1jb9kb796295482b62w5cj29msfj8zis33sp2rw2vmv2g"))))
|
|
(build-system asdf-build-system/sbcl)
|
|
(home-page "https://github.com/lmj/1am")
|
|
(synopsis "Minimal testing framework for Common Lisp")
|
|
(description "A minimal testing framework for Common Lisp.")
|
|
(license license:expat))))
|
|
|
|
(define-public cl-1am
|
|
(sbcl-package->cl-source-package sbcl-1am))
|
|
|
|
(define-public ecl-1am
|
|
(sbcl-package->ecl-package sbcl-1am))
|
|
|
|
(define-public sbcl-2am
|
|
(let ((commit "1d2fd21bbd8f26ec91b962705cab098dd7b5f11c")
|
|
(revision "0"))
|
|
(package
|
|
(name "sbcl-2am")
|
|
(version (git-version "0.0.0" revision commit))
|
|
(source
|
|
(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://gitlab.common-lisp.net/dkochmanski/2am")
|
|
(commit commit)))
|
|
(file-name (git-file-name "cl-2am" version))
|
|
(sha256
|
|
(base32 "0zgx4ymyzvfg44z36yr4l87cd9mprajd7sycr2zc67ab6330rynf"))))
|
|
(build-system asdf-build-system/sbcl)
|
|
(home-page "https://gitlab.common-lisp.net/dkochmanski/2am")
|
|
(synopsis "Small testing framework based on 1am")
|
|
(description
|
|
"This is a small testing framework for Common Lisp. The entire API
|
|
consists of: @code{test}, @code{is}, @code{signals}, @code{finishes},
|
|
@code{run}, @code{suite} and @code{setf suite}.")
|
|
(license license:expat))))
|
|
|
|
(define-public cl-2am
|
|
(sbcl-package->cl-source-package sbcl-2am))
|
|
|
|
(define-public ecl-2am
|
|
(sbcl-package->ecl-package sbcl-2am))
|
|
|
|
(define-public sbcl-assertion-error
|
|
(let ((commit "8eab692a990d4caa193a46bae99af3e13e717b86")
|
|
(revision "1"))
|
|
(package
|
|
(name "sbcl-assertion-error")
|
|
(version (git-version "0.1.0" revision commit))
|
|
(source
|
|
(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/noloop/assertion-error")
|
|
(commit commit)))
|
|
(file-name (git-file-name "assertion-error" version))
|
|
(sha256
|
|
(base32 "0ix23kkakmf4nwx852zsssb831jvajr3qyppqfyks7y1ls617svn"))))
|
|
(build-system asdf-build-system/sbcl)
|
|
(inputs (list sbcl-dissect))
|
|
(home-page "https://github.com/noloop/assertion-error")
|
|
(synopsis "Error pattern for assertion libraries in Common Lisp")
|
|
(description "This package provides a Common Lisp assertion system with
|
|
minimal dependencies on DISSECT.")
|
|
(license license:gpl3))))
|
|
|
|
(define-public ecl-assertion-error
|
|
(sbcl-package->ecl-package sbcl-assertion-error))
|
|
|
|
(define-public cl-assertion-error
|
|
(sbcl-package->cl-source-package sbcl-assertion-error))
|
|
|
|
(define-public sbcl-assert-p
|
|
(package
|
|
(name "sbcl-assert-p")
|
|
(version "1.0.1")
|
|
(source
|
|
(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/noloop/assert-p")
|
|
(commit (string-append "v" version))))
|
|
(file-name (git-file-name "assert-p" version))
|
|
(sha256
|
|
(base32 "1x24rkqkqiw8zd26swi9rmhfplkmr5scz3bhjwccah9d2s36b1xs"))))
|
|
(build-system asdf-build-system/sbcl)
|
|
(inputs (list sbcl-assertion-error sbcl-simplet))
|
|
(home-page "https://github.com/noloop/assert-p")
|
|
(synopsis "Common Lisp assertion library")
|
|
(description "This package provides a Common Lisp collection of assertions.")
|
|
(license license:gpl3)))
|
|
|
|
(define-public ecl-assert-p
|
|
(sbcl-package->ecl-package sbcl-assert-p))
|
|
|
|
(define-public cl-assert-p
|
|
(sbcl-package->cl-source-package sbcl-assert-p))
|
|
|
|
(define-public sbcl-cacau
|
|
(package
|
|
(name "sbcl-cacau")
|
|
(version "1.0.0")
|
|
(source
|
|
(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/noloop/cacau")
|
|
(commit (string-append "v" version))))
|
|
(file-name (git-file-name "cacau" version))
|
|
(sha256
|
|
(base32 "0m8v1xw68cr5ldv045rxgvnhigr4iahh7v6v32z6xlq2sj6r55x0"))))
|
|
(build-system asdf-build-system/sbcl)
|
|
(native-inputs (list sbcl-assert-p))
|
|
(inputs (list sbcl-assertion-error sbcl-eventbus))
|
|
(home-page "https://github.com/noloop/cacau")
|
|
(synopsis "Comon Lisp test runner")
|
|
(description
|
|
"This package provides a Common Lisp testing framework system CACAU which was
|
|
built to be independent of assertions systems.")
|
|
(license license:gpl3)))
|
|
|
|
(define-public ecl-cacau
|
|
(sbcl-package->ecl-package sbcl-cacau))
|
|
|
|
(define-public cl-cacau
|
|
(sbcl-package->cl-source-package sbcl-cacau))
|
|
|
|
(define-public sbcl-check-it
|
|
(let ((commit "b79c9103665be3976915b56b570038f03486e62f"))
|
|
(package
|
|
(name "sbcl-check-it")
|
|
(version (git-version "0.1.0" "1" commit))
|
|
(source
|
|
(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/DalekBaldwin/check-it/")
|
|
(commit commit)))
|
|
(file-name (git-file-name name version))
|
|
(sha256
|
|
(base32 "1kbjwpniffdpv003igmlz5r0vy65m7wpfnhg54fhwirp1227hgg7"))))
|
|
(build-system asdf-build-system/sbcl)
|
|
(inputs
|
|
(list sbcl-alexandria sbcl-closer-mop sbcl-optima))
|
|
(native-inputs
|
|
(list sbcl-stefil))
|
|
(home-page "https://github.com/arclanguage/Clamp")
|
|
(synopsis "Randomized specification-based testing for Common Lisp")
|
|
(description
|
|
"This is a randomized property-based testing library for Common Lisp.
|
|
Rather than being a full-fledged general test framework in its own right, it's
|
|
designed to embed randomized tests in whatever framework you like.")
|
|
(license license:llgpl))))
|
|
|
|
(define-public cl-check-it
|
|
(sbcl-package->cl-source-package sbcl-check-it))
|
|
|
|
(define-public ecl-check-it
|
|
(sbcl-package->ecl-package sbcl-check-it))
|
|
|
|
(define-public sbcl-checkl
|
|
(let ((commit "80328800d047fef9b6e32dfe6bdc98396aee3cc9")
|
|
(revision "1"))
|
|
(package
|
|
(name "sbcl-checkl")
|
|
(version (git-version "0.0.0" revision commit))
|
|
(source
|
|
(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/rpav/CheckL")
|
|
(commit commit)))
|
|
(file-name (git-file-name name version))
|
|
(sha256
|
|
(base32 "0bpisihx1gay44xmyr1dmhlwh00j0zzi04rp9fy35i95l2r4xdlx"))))
|
|
(build-system asdf-build-system/sbcl)
|
|
(arguments
|
|
;; Error while trying to load definition for system checkl-test from
|
|
;; pathname [...]/checkl-test.asd: The function CHECKL:DEFINE-TEST-OP
|
|
;; is undefined.
|
|
'(#:tests? #f))
|
|
(native-inputs
|
|
(list sbcl-fiveam))
|
|
(inputs
|
|
(list sbcl-marshal))
|
|
(home-page "https://github.com/rpav/CheckL/")
|
|
(synopsis "Dynamic testing for Common Lisp")
|
|
(description
|
|
"CheckL lets you write tests dynamically, it checks resulting values
|
|
against the last run.")
|
|
;; The author specifies both LLGPL and "BSD", but the "BSD" license
|
|
;; isn't specified anywhere, so I don't know which kind. LLGPL is the
|
|
;; stronger of the two and so I think only listing this should suffice.
|
|
(license license:llgpl))))
|
|
|
|
(define-public cl-checkl
|
|
(sbcl-package->cl-source-package sbcl-checkl))
|
|
|
|
(define-public ecl-checkl
|
|
(sbcl-package->ecl-package sbcl-checkl))
|
|
|
|
(define-public sbcl-cl-mock
|
|
(let ((commit "01762fda96718fefd3745ce4a20a4013a865b109")
|
|
(revision "0"))
|
|
(package
|
|
(name "sbcl-cl-mock")
|
|
(version (git-version "1.1.0" revision commit))
|
|
(source
|
|
(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/Ferada/cl-mock/")
|
|
(commit commit)))
|
|
(file-name (git-file-name "cl-mock" version))
|
|
(sha256
|
|
(base32 "19641sm3klx9yfk8lr376rfkd26vy72yp1hkpkqcw3q3m1xrf9xp"))))
|
|
(build-system asdf-build-system/sbcl)
|
|
(arguments
|
|
`(#:asd-systems '("cl-mock" "cl-mock-basic")))
|
|
(inputs
|
|
(list sbcl-alexandria
|
|
sbcl-bordeaux-threads
|
|
sbcl-closer-mop
|
|
sbcl-trivia))
|
|
(native-inputs
|
|
(list sbcl-fiveam))
|
|
(home-page "https://github.com/Ferada/cl-mock")
|
|
(synopsis "Mocking functions for Common Lisp testing")
|
|
(description
|
|
"This small library provides a way to replace the actual implementation
|
|
of either regular or generic functions with mocks.")
|
|
(license license:agpl3))))
|
|
|
|
(define-public ecl-cl-mock
|
|
(sbcl-package->ecl-package sbcl-cl-mock))
|
|
|
|
(define-public cl-mock
|
|
(sbcl-package->cl-source-package sbcl-cl-mock))
|
|
|
|
(define-public sbcl-cl-quickcheck
|
|
(let ((commit "807b2792a30c883a2fbecea8e7db355b50ba662f")
|
|
(revision "1"))
|
|
(package
|
|
(name "sbcl-cl-quickcheck")
|
|
(version (git-version "0.0.4" revision commit))
|
|
(source
|
|
(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/mcandre/cl-quickcheck")
|
|
(commit commit)))
|
|
(file-name (git-file-name name version))
|
|
(sha256
|
|
(base32
|
|
"165lhypq5xkcys6hvzb3jq7ywnmqvzaflda29qk2cbs3ggas4767"))))
|
|
(build-system asdf-build-system/sbcl)
|
|
(synopsis
|
|
"Common Lisp port of the QuickCheck unit test framework")
|
|
(description
|
|
"Common Lisp port of the QuickCheck unit test framework")
|
|
(home-page "https://github.com/mcandre/cl-quickcheck")
|
|
;; MIT
|
|
(license license:expat))))
|
|
|
|
(define-public cl-quickcheck
|
|
(sbcl-package->cl-source-package sbcl-cl-quickcheck))
|
|
|
|
(define-public ecl-cl-quickcheck
|
|
(sbcl-package->ecl-package sbcl-cl-quickcheck))
|
|
|
|
(define-public sbcl-clunit
|
|
(let ((commit "6f6d72873f0e1207f037470105969384f8380628")
|
|
(revision "1"))
|
|
(package
|
|
(name "sbcl-clunit")
|
|
(version (git-version "0.2.3" revision commit))
|
|
(source
|
|
(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/tgutu/clunit")
|
|
(commit commit)))
|
|
(file-name (git-file-name name version))
|
|
(sha256
|
|
(base32
|
|
"1idf2xnqzlhi8rbrqmzpmb3i1l6pbdzhhajkmhwbp6qjkmxa4h85"))))
|
|
(build-system asdf-build-system/sbcl)
|
|
(synopsis "CLUnit is a Common Lisp unit testing framework")
|
|
(description
|
|
"CLUnit is a Common Lisp unit testing framework. It is designed
|
|
to be easy to use so that you can quickly start testing. CLUnit
|
|
provides a rich set of features aimed at improving your unit testing
|
|
experience.")
|
|
(home-page "https://tgutu.github.io/clunit/")
|
|
;; MIT License
|
|
(license license:expat))))
|
|
|
|
(define-public cl-clunit
|
|
(sbcl-package->cl-source-package sbcl-clunit))
|
|
|
|
(define-public ecl-clunit
|
|
(sbcl-package->ecl-package sbcl-clunit))
|
|
|
|
(define-public sbcl-clunit2
|
|
(let ((commit "b24c56851ee6ee6c4a9dc3725a634c06b604f207")
|
|
(revision "2"))
|
|
(package
|
|
(name "sbcl-clunit2")
|
|
(version (git-version "0.6.1" revision commit))
|
|
(source
|
|
(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://codeberg.org/cage/clunit2.git")
|
|
(commit commit)))
|
|
(file-name (git-file-name "cl-clunit2" version))
|
|
(sha256
|
|
(base32 "03k4wc2zz31wcqcxy8fhq095i8xzcaxrzgrlrn2va10lcjs4v51b"))))
|
|
(build-system asdf-build-system/sbcl)
|
|
(synopsis "Unit testing framework for Common Lisp")
|
|
(description
|
|
"CLUnit2 is a Common Lisp unit testing framework. It is designed to be
|
|
easy to use so that you can quickly start testing.")
|
|
(home-page "https://codeberg.org/cage/clunit2")
|
|
(license license:expat))))
|
|
|
|
(define-public cl-clunit2
|
|
(sbcl-package->cl-source-package sbcl-clunit2))
|
|
|
|
(define-public ecl-clunit2
|
|
(sbcl-package->ecl-package sbcl-clunit2))
|
|
|
|
(define-public sbcl-confidence
|
|
(let ((commit "5cbc74715348e12e689afb2d459dcb216c640a44")
|
|
(revision "0"))
|
|
(package
|
|
(name "sbcl-confidence")
|
|
(version (git-version "0.0.0" revision commit))
|
|
(source
|
|
(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/melusina-org/cl-confidence")
|
|
(commit commit)))
|
|
(file-name (git-file-name "cl-confidence" version))
|
|
(sha256
|
|
(base32 "0zc135rvq2valrw15bh8k6i53v7kk5l7x0kccb1bf7pglc8zgivs"))))
|
|
(build-system asdf-build-system/sbcl)
|
|
(arguments
|
|
`(#:asd-systems '("org.melusina.confidence"
|
|
"org.melusina.confidence/testsuite")))
|
|
(inputs (list sbcl-alexandria))
|
|
(home-page "https://github.com/melusina-org/cl-confidence")
|
|
(synopsis "Interactive test framework for Common Lisp")
|
|
(description
|
|
"Confidence is a test framework for Common Lisp that focuses on
|
|
simplicity. It avoids bureaucracy and makes it easy to work interactively,
|
|
without a complicated setup, and with explicit functions and decisions.")
|
|
(license license:expat))))
|
|
|
|
(define-public ecl-confidence
|
|
(sbcl-package->ecl-package sbcl-confidence))
|
|
|
|
(define-public cl-confidence
|
|
(sbcl-package->cl-source-package sbcl-confidence))
|
|
|
|
(define-public sbcl-eos
|
|
(let ((commit "b4413bccc4d142cbe1bf49516c3a0a22c9d99243")
|
|
(revision "2"))
|
|
(package
|
|
(name "sbcl-eos")
|
|
(version (git-version "0.0.0" revision commit))
|
|
(source
|
|
(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/adlai/Eos")
|
|
(commit commit)))
|
|
(sha256
|
|
(base32 "1afllvmlnx97yzz404gycl3pa3kwx427k3hrbf37rpmjlv47knhk"))
|
|
(file-name (git-file-name "eos" version))))
|
|
(build-system asdf-build-system/sbcl)
|
|
(synopsis "Unit Testing for Common Lisp")
|
|
(description
|
|
"Eos was a unit testing library for Common Lisp.
|
|
It began as a fork of FiveAM; however, FiveAM development has continued, while
|
|
that of Eos has not. Thus, Eos is now deprecated in favor of FiveAM.")
|
|
(home-page "https://github.com/adlai/Eos")
|
|
(license license:expat))))
|
|
|
|
(define-public cl-eos
|
|
(sbcl-package->cl-source-package sbcl-eos))
|
|
|
|
(define-public ecl-eos
|
|
(sbcl-package->ecl-package sbcl-eos))
|
|
|
|
(define-public sbcl-fiasco
|
|
(let ((commit "bb47d2fef4eb24cc16badc1c9a73d73c3a7e18f5")
|
|
(revision "2"))
|
|
(package
|
|
(name "sbcl-fiasco")
|
|
(version (git-version "0.0.1" revision commit))
|
|
(source
|
|
(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/joaotavora/fiasco")
|
|
(commit commit)))
|
|
(file-name (git-file-name "fiasco" version))
|
|
(sha256
|
|
(base32
|
|
"1k8i2kq57201bvy3zfpsxld530hd104dgbglxigqb6i408c1a7aw"))))
|
|
(build-system asdf-build-system/sbcl)
|
|
(inputs
|
|
(list sbcl-alexandria sbcl-trivial-gray-streams))
|
|
(synopsis "Simple and powerful test framework for Common Lisp")
|
|
(description "A Common Lisp test framework that treasures your failures,
|
|
logical continuation of Stefil. It focuses on interactive debugging.")
|
|
(home-page "https://github.com/joaotavora/fiasco")
|
|
;; LICENCE specifies this is public-domain unless the legislation
|
|
;; doesn't allow or recognize it. In that case it falls back to a
|
|
;; permissive licence.
|
|
(license (list license:public-domain
|
|
(license:x11-style "file://LICENCE"))))))
|
|
|
|
(define-public cl-fiasco
|
|
(sbcl-package->cl-source-package sbcl-fiasco))
|
|
|
|
(define-public ecl-fiasco
|
|
(sbcl-package->ecl-package sbcl-fiasco))
|
|
|
|
(define-public sbcl-fiveam
|
|
(package
|
|
(name "sbcl-fiveam")
|
|
(version "1.4.2")
|
|
(source
|
|
(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/sionescu/fiveam")
|
|
(commit (string-append "v" version))))
|
|
(file-name (git-file-name "fiveam" version))
|
|
(sha256
|
|
(base32 "04mh5plmlb15jbq3dkd8b9jl1dmbbg4hnd3k7859vpf6s12k5p4j"))))
|
|
(inputs
|
|
(list sbcl-alexandria sbcl-net.didierverna.asdf-flv
|
|
sbcl-trivial-backtrace))
|
|
(build-system asdf-build-system/sbcl)
|
|
(synopsis "Common Lisp testing framework")
|
|
(description "FiveAM is a simple (as far as writing and running tests
|
|
goes) regression testing framework. It has been designed with Common Lisp's
|
|
interactive development model in mind.")
|
|
(home-page "https://common-lisp.net/project/fiveam/")
|
|
(license license:bsd-3)))
|
|
|
|
(define-public cl-fiveam
|
|
(sbcl-package->cl-source-package sbcl-fiveam))
|
|
|
|
(define-public ecl-fiveam
|
|
(sbcl-package->ecl-package sbcl-fiveam))
|
|
|
|
(define-public sbcl-hamcrest
|
|
(let ((commit "a54553e59a70dc5a539b683e79bfcdb0e8bae5c8")
|
|
(revision "0"))
|
|
(package
|
|
(name "sbcl-hamcrest")
|
|
(version "0.4.4")
|
|
(source
|
|
(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/40ants/cl-hamcrest")
|
|
(commit commit)))
|
|
(sha256
|
|
(base32 "181nnb2fjbsdqjqdvwg2x9n1jjalkfzszwdgqcap4py2q63q1kxj"))
|
|
(file-name (git-file-name "cl-hamcrest" commit))))
|
|
(build-system asdf-build-system/sbcl)
|
|
(inputs
|
|
(list sbcl-iterate
|
|
sbcl-split-sequence
|
|
sbcl-cl-ppcre
|
|
sbcl-alexandria
|
|
sbcl-rove
|
|
sbcl-prove))
|
|
(home-page "https://40ants.com/cl-hamcrest/")
|
|
(synopsis "Make CL unit tests more readable")
|
|
(description
|
|
"@code{cl-hamcrest} is an implementation of the Hamcrest idea in
|
|
Common Lisp. It simplifes unit tests and makes them more readable.
|
|
Hamcrest uses the idea of pattern-matching, to construct matchers from
|
|
different pieces and to apply them to the data.")
|
|
(license license:bsd-3))))
|
|
|
|
(define-public cl-hamcrest
|
|
(sbcl-package->cl-source-package sbcl-hamcrest))
|
|
|
|
(define-public ecl-cl-hamcrest
|
|
(sbcl-package->ecl-package sbcl-hamcrest))
|
|
|
|
(define-public sbcl-hu.dwim.stefil
|
|
(let ((commit "414902c6f575818c39a8a156b8b61b1adfa73dad"))
|
|
(package
|
|
(name "sbcl-hu.dwim.stefil")
|
|
(version (git-version "0.0.0" "2" commit))
|
|
(source
|
|
(origin
|
|
(method git-fetch)
|
|
(uri
|
|
(git-reference
|
|
(url "https://github.com/hu-dwim/hu.dwim.stefil")
|
|
(commit commit)))
|
|
(sha256
|
|
(base32 "14izmjjim590rh74swrssavdmdznj2z8vhqixy780sjhpcr5pmkc"))
|
|
(file-name (git-file-name "hu.dwim.stefil" version))))
|
|
(build-system asdf-build-system/sbcl)
|
|
(native-inputs
|
|
(list sbcl-hu.dwim.asdf))
|
|
(inputs
|
|
(list sbcl-alexandria))
|
|
(home-page "http://dwim.hu/project/hu.dwim.stefil")
|
|
(synopsis "Simple test framework")
|
|
(description "Stefil is a simple test framework for Common Lisp,
|
|
with a focus on interactive development.")
|
|
(license license:public-domain))))
|
|
|
|
(define-public cl-hu.dwim.stefil
|
|
(sbcl-package->cl-source-package sbcl-hu.dwim.stefil))
|
|
|
|
(define-public ecl-hu.dwim.stefil
|
|
(sbcl-package->ecl-package sbcl-hu.dwim.stefil))
|
|
|
|
(define-public sbcl-kaputt
|
|
(let ((commit "f26c9b0f8219fe61d86249198ef85174eecafc10")
|
|
(revision "1"))
|
|
(package
|
|
(name "sbcl-kaputt")
|
|
(version (git-version "0.0.0" revision commit))
|
|
(source
|
|
(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/foretspaisibles/cl-kaputt")
|
|
(commit commit)))
|
|
(file-name (git-file-name "kaputt" version))
|
|
(sha256
|
|
(base32 "10a78032vnf12kjjpfmq9ign38cad237ycyq37dwnx922nxjjaj4"))))
|
|
(build-system asdf-build-system/sbcl)
|
|
(inputs
|
|
(list sbcl-cl-ppcre))
|
|
(home-page "https://github.com/foretspaisibles/cl-kaputt")
|
|
(synopsis "Simple interactive test framework for Common Lisp")
|
|
(description
|
|
"KAPUTT is a test framework for Common Lisp that focuses on the
|
|
following features:
|
|
|
|
@itemize
|
|
@item KAPUTT is simple, it only defines three abstractions testcase, assertion
|
|
and protocol and does not add any artefact on the backtrace when errors occur.
|
|
|
|
@item KAPUTT is extensible, it is possible to add problem-specific assertions
|
|
to make test code more informative.
|
|
|
|
@item KAPUTT fits well interactive development.
|
|
@end itemize\n")
|
|
(license license:cecill-b))))
|
|
|
|
(define-public ecl-kaputt
|
|
(sbcl-package->ecl-package sbcl-kaputt))
|
|
|
|
(define-public cl-kaputt
|
|
(sbcl-package->cl-source-package sbcl-kaputt))
|
|
|
|
(define-public sbcl-lift
|
|
(let ((commit "a7941845a9de72be60e66ea941aa34cbee35bf23")
|
|
(revision "3"))
|
|
(package
|
|
(name "sbcl-lift")
|
|
(version (git-version "1.7.1" revision commit))
|
|
(source
|
|
(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/hraban/lift")
|
|
(commit commit)))
|
|
(sha256
|
|
(base32 "1513n46fkqw8rnvz69s7xnwj476qm8ibdlwsr63qj9yh0mib0q6x"))
|
|
(file-name (git-file-name "lift" version))
|
|
(modules '((guix build utils)))
|
|
(snippet
|
|
;; Don't keep the bundled website
|
|
`(begin
|
|
(delete-file-recursively "website")
|
|
#t))))
|
|
(build-system asdf-build-system/sbcl)
|
|
(arguments
|
|
;; The tests require a debugger, but we run with the debugger disabled.
|
|
'(#:tests? #f))
|
|
(synopsis "LIsp Framework for Testing")
|
|
(description
|
|
"The LIsp Framework for Testing (LIFT) is a unit and system test tool for LISP.
|
|
Though inspired by SUnit and JUnit, it's built with Lisp in mind. In LIFT,
|
|
testcases are organized into hierarchical testsuites each of which can have
|
|
its own fixture. When run, a testcase can succeed, fail, or error. LIFT
|
|
supports randomized testing, benchmarking, profiling, and reporting.")
|
|
(home-page "https://github.com/gwkkwg/lift")
|
|
(license license:expat))))
|
|
|
|
(define-public cl-lift
|
|
(sbcl-package->cl-source-package sbcl-lift))
|
|
|
|
(define-public ecl-lift
|
|
(sbcl-package->ecl-package sbcl-lift))
|
|
|
|
(define-public sbcl-lisp-unit
|
|
(let ((commit "89653a232626b67400bf9a941f9b367da38d3815"))
|
|
(package
|
|
(name "sbcl-lisp-unit")
|
|
(version (git-version "0.0.0" "1" commit))
|
|
(source
|
|
(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/OdonataResearchLLC/lisp-unit")
|
|
(commit commit)))
|
|
(sha256
|
|
(base32
|
|
"0p6gdmgr7p383nvd66c9y9fp2bjk4jx1lpa5p09g43hr9y9pp9ry"))
|
|
(file-name (git-file-name "lisp-unit" version))))
|
|
(build-system asdf-build-system/sbcl)
|
|
(synopsis "Common Lisp Test framework inspired by JUnit to be simple of use")
|
|
(description
|
|
"@command{lisp-unit} is a Common Lisp library that supports unit
|
|
testing. It is an extension of the library written by Chris Riesbeck.")
|
|
(home-page "https://github.com/OdonataResearchLLC/lisp-unit")
|
|
(license license:expat))))
|
|
|
|
(define-public cl-lisp-unit
|
|
(sbcl-package->cl-source-package sbcl-lisp-unit))
|
|
|
|
(define-public ecl-lisp-unit
|
|
(sbcl-package->ecl-package sbcl-lisp-unit))
|
|
|
|
(define-public sbcl-lisp-unit2
|
|
;; There is a cyclical dependency between symbol-munger and lisp-unit2.
|
|
;; See https://github.com/AccelerationNet/symbol-munger/issues/4
|
|
(let ((commit "b5aa17b298cf2f669f4c0262c471e1ee4ab4699a")
|
|
(revision "0"))
|
|
(package
|
|
(name "sbcl-lisp-unit2")
|
|
(version (git-version "0.9.4" revision commit))
|
|
(source
|
|
(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/AccelerationNet/lisp-unit2")
|
|
(commit commit)))
|
|
(file-name (git-file-name "cl-lisp-unit2" version))
|
|
(sha256
|
|
(base32 "140nn22n1xv3qaash3x6h2h7xmys44s3f42b7bakfhpc4qlx0b69"))))
|
|
(build-system asdf-build-system/sbcl)
|
|
(inputs
|
|
(list sbcl-alexandria sbcl-cl-interpol sbcl-iterate
|
|
sbcl-symbol-munger))
|
|
(synopsis "Test Framework for Common Lisp")
|
|
(description
|
|
"LISP-UNIT2 is a Common Lisp library that supports unit testing in the
|
|
style of JUnit for Java. It is a new version of the lisp-unit library written
|
|
by Chris Riesbeck.")
|
|
(home-page "https://github.com/AccelerationNet/lisp-unit2")
|
|
(license license:expat))))
|
|
|
|
(define-public cl-lisp-unit2
|
|
(sbcl-package->cl-source-package sbcl-lisp-unit2))
|
|
|
|
(define-public ecl-lisp-unit2
|
|
(sbcl-package->ecl-package sbcl-lisp-unit2))
|
|
|
|
(define-public sbcl-nst
|
|
(let ((commit "6c0990f594abcf5887e8d80f1035e3b60454b61b")
|
|
(revision "1"))
|
|
(package
|
|
(name "sbcl-nst")
|
|
(version (git-version "4.1.2" revision commit))
|
|
(source
|
|
(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/jphmrst/cl-nst")
|
|
(commit commit)))
|
|
(file-name (git-file-name "nst" version))
|
|
(sha256
|
|
(base32 "1hf3r6pqbnd9vsd1i24qmz928kia72hdgmiafiwb6jw1hmj3r6ga"))))
|
|
(build-system asdf-build-system/sbcl)
|
|
(inputs
|
|
(list sbcl-closer-mop sbcl-org-sampler))
|
|
(home-page "https://github.com/jphmrst/cl-nst")
|
|
(synopsis "Unit testing for Common Lisp")
|
|
(description
|
|
"NST is a unit/regression testing system for Common Lisp.")
|
|
(license license:llgpl))))
|
|
|
|
(define-public ecl-nst
|
|
(sbcl-package->ecl-package sbcl-nst))
|
|
|
|
(define-public cl-nst
|
|
(sbcl-package->cl-source-package sbcl-nst))
|
|
|
|
(define-public sbcl-parachute
|
|
(let ((commit "bd072b0e4d0ff3ee2201eca3eb28c287686ab49e")
|
|
(revision "1"))
|
|
(package
|
|
(name "sbcl-parachute")
|
|
(version (git-version "1.5.0" revision commit))
|
|
(source
|
|
(origin
|
|
(method git-fetch)
|
|
(uri
|
|
(git-reference
|
|
(url "https://github.com/Shinmera/parachute")
|
|
(commit commit)))
|
|
(file-name (git-file-name "cl-parachute" version))
|
|
(sha256
|
|
(base32 "0srjsklhr04snlv98021mb0a5lb8dlypv1lnjdhsdhjbbiwbw2n9"))))
|
|
(build-system asdf-build-system/sbcl)
|
|
(inputs
|
|
(list sbcl-documentation-utils
|
|
sbcl-form-fiddle
|
|
sbcl-trivial-custom-debugger))
|
|
(synopsis "Extensible and cross-compatible testing framework for Common Lisp")
|
|
(description
|
|
"Parachute is a simple-to-use and extensible testing framework.
|
|
In Parachute, things are organised as a bunch of named tests within a package.
|
|
Each test can contain a bunch of test forms that make up its body.")
|
|
(home-page "https://shinmera.github.io/parachute/")
|
|
(license license:zlib))))
|
|
|
|
(define-public cl-parachute
|
|
(sbcl-package->cl-source-package sbcl-parachute))
|
|
|
|
(define-public ecl-parachute
|
|
(sbcl-package->ecl-package sbcl-parachute))
|
|
|
|
(define-public sbcl-prove
|
|
(let ((commit "5d71f02795b89e36f34e8c7d50e69b67ec6ca2de")
|
|
(revision "2"))
|
|
(package
|
|
(name "sbcl-prove")
|
|
(version (git-version "1.0.0" revision commit))
|
|
(source
|
|
(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/fukamachi/prove")
|
|
(commit commit)))
|
|
(sha256
|
|
(base32 "0ca6ha3zhmckq3ad9lxm6sbg4i0hg3m81xhan4dkxd3x9898jzpc"))
|
|
(file-name (git-file-name "prove" version))))
|
|
(build-system asdf-build-system/sbcl)
|
|
(inputs
|
|
(list sbcl-alexandria sbcl-cl-colors sbcl-cl-ppcre
|
|
sbcl-cl-ansi-text))
|
|
(synopsis "Yet another unit testing framework for Common Lisp")
|
|
(description
|
|
"This project was originally called @command{cl-test-more}.
|
|
@command{prove} is yet another unit testing framework for Common Lisp. The
|
|
advantages of @command{prove} are:
|
|
|
|
@itemize
|
|
@item Various simple functions for testing and informative error messages
|
|
@item ASDF integration
|
|
@item Extensible test reporters
|
|
@item Colorizes the report if it's available (note for SLIME)
|
|
@item Reports test durations
|
|
@end itemize\n")
|
|
(home-page "https://github.com/fukamachi/prove")
|
|
(license license:expat))))
|
|
|
|
(define-public cl-prove
|
|
(sbcl-package->cl-source-package sbcl-prove))
|
|
|
|
(define-public ecl-prove
|
|
(sbcl-package->ecl-package sbcl-prove))
|
|
|
|
(define-public sbcl-ptester
|
|
(let ((commit "fe69fde54f4bce00ce577feb918796c293fc7253")
|
|
(revision "1"))
|
|
(package
|
|
(name "sbcl-ptester")
|
|
(version (git-version "2.1.3" revision commit))
|
|
(source
|
|
(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "http://git.kpe.io/ptester.git")
|
|
(commit commit)))
|
|
(file-name (git-file-name name version))
|
|
(sha256
|
|
(base32 "1l0lfl7cdnr2qf4zh38hi4llxg22c49zkm639bdkmvlkzwj3ndwf"))
|
|
(modules '((guix build utils)))
|
|
(snippet
|
|
;; The useless bundled debian folder drags `make' into the closure.
|
|
`(begin
|
|
(delete-file-recursively "debian")
|
|
#t))))
|
|
(build-system asdf-build-system/sbcl)
|
|
(home-page "https://quickdocs.org/ptester/")
|
|
(synopsis "Portable test harness package")
|
|
(description
|
|
"@command{ptester} is a portable testing framework based on Franz's
|
|
tester module.")
|
|
(license license:llgpl))))
|
|
|
|
(define-public cl-ptester
|
|
(sbcl-package->cl-source-package sbcl-ptester))
|
|
|
|
(define-public ecl-ptester
|
|
(sbcl-package->ecl-package sbcl-ptester))
|
|
|
|
(define-public sbcl-rove
|
|
(let ((commit "6a5dfcdced42879a4eff2a529e7e8ce492fadf41")
|
|
(revision "1"))
|
|
(package
|
|
(name "sbcl-rove")
|
|
(version (git-version "0.10.0" revision commit))
|
|
(source (origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/fukamachi/rove")
|
|
(commit commit)))
|
|
(file-name (git-file-name "cl-rove" version))
|
|
(sha256
|
|
(base32
|
|
"1w99c0795ykhn14pfhyhvfzxzz0k1z1bb846xgz3iv19s0j2vykr"))))
|
|
(build-system asdf-build-system/sbcl)
|
|
(inputs (list sbcl-bordeaux-threads
|
|
sbcl-dissect
|
|
sbcl-trivial-gray-streams))
|
|
(home-page "https://github.com/fukamachi/rove")
|
|
(synopsis "Yet another common lisp testing library")
|
|
(description
|
|
"Rove is a unit testing framework for Common Lisp applications.
|
|
This is intended to be a successor of Prove.")
|
|
(license license:bsd-3))))
|
|
|
|
(define-public cl-rove
|
|
(sbcl-package->cl-source-package sbcl-rove))
|
|
|
|
(define-public ecl-rove
|
|
(sbcl-package->ecl-package sbcl-rove))
|
|
|
|
(define-public sbcl-rt
|
|
(let ((commit "a6a7503a0b47953bc7579c90f02a6dba1f6e4c5a")
|
|
(revision "1"))
|
|
(package
|
|
(name "sbcl-rt")
|
|
(version (git-version "1990.12.19" revision commit))
|
|
(source
|
|
(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "http://git.kpe.io/rt.git")
|
|
(commit commit)))
|
|
(file-name (git-file-name name version))
|
|
(sha256
|
|
(base32 "13si2rrxaagbr0bkvg6sqicxxpyshabx6ad6byc9n2ik5ysna69b"))
|
|
(modules '((guix build utils)))
|
|
(snippet
|
|
;; The useless bundled debian folder drags `make' into the closure.
|
|
`(begin
|
|
(delete-file-recursively "debian")
|
|
#t))))
|
|
(build-system asdf-build-system/sbcl)
|
|
(synopsis "MIT Regression Tester")
|
|
(description
|
|
"RT provides a framework for writing regression test suites.")
|
|
(home-page "https://www.cliki.net/rt")
|
|
(license license:expat))))
|
|
|
|
(define-public cl-rt
|
|
(sbcl-package->cl-source-package sbcl-rt))
|
|
|
|
(define-public ecl-rt
|
|
(sbcl-package->ecl-package sbcl-rt))
|
|
|
|
(define-public sbcl-should-test
|
|
(let ((commit "48facb9f9c07aeceb71fc0c48ce17fd7d54a09d4")
|
|
(revision "0"))
|
|
(package
|
|
(name "sbcl-should-test")
|
|
(version (git-version "1.0.0" revision commit))
|
|
(source
|
|
(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/vseloved/should-test")
|
|
(commit commit)))
|
|
(file-name (git-file-name "should-test" version))
|
|
(sha256
|
|
(base32 "1fqqa7lhf28qg60ji9libkylkcy747x576qpjn1y7c945j2fxmnm"))))
|
|
(build-system asdf-build-system/sbcl)
|
|
(inputs
|
|
(list sbcl-cl-ppcre sbcl-local-time sbcl-osicat sbcl-rutils))
|
|
(home-page "https://github.com/vseloved/should-test")
|
|
(synopsis "Minimal yet feature-rich Common Lisp test framework")
|
|
(description
|
|
"SHOULD-TEST is a methodology-agnostic and non-opinionated Common Lisp
|
|
test framework, i.e. it doesn't care what kind of test approach you'd like to
|
|
take.")
|
|
(license license:expat))))
|
|
|
|
(define-public cl-should-test
|
|
(sbcl-package->cl-source-package sbcl-should-test))
|
|
|
|
(define-public ecl-should-test
|
|
(sbcl-package->ecl-package sbcl-should-test))
|
|
|
|
(define-public sbcl-simplet
|
|
(package
|
|
(name "sbcl-simplet")
|
|
(version "1.2.0")
|
|
(source
|
|
(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/noloop/simplet")
|
|
(commit (string-append "v" version))))
|
|
(file-name (git-file-name "simplet" version))
|
|
(sha256
|
|
(base32 "1iwp3a43mns885k2arr7gbmyv5rsrjfvgarxickj7r2bfgwp1cnn"))))
|
|
(build-system asdf-build-system/sbcl)
|
|
(home-page "https://github.com/noloop/simplet")
|
|
(synopsis "Simple test runner in Common Lisp")
|
|
(description "This package provides a Common Lisp test runner system
|
|
SIMPLET.")
|
|
(license license:gpl3)))
|
|
|
|
(define-public ecl-simplet
|
|
(sbcl-package->ecl-package sbcl-simplet))
|
|
|
|
(define-public cl-simplet
|
|
(sbcl-package->cl-source-package sbcl-simplet))
|
|
|
|
(define-public sbcl-stefil
|
|
(let ((commit "0398548ec95dceb50fc2c2c03e5fb0ce49b86c7a")
|
|
(revision "0"))
|
|
(package
|
|
(name "sbcl-stefil")
|
|
(version (git-version "0.1" revision commit))
|
|
(source
|
|
(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://gitlab.common-lisp.net/stefil/stefil.git")
|
|
(commit commit)))
|
|
(file-name (git-file-name name version))
|
|
(sha256
|
|
(base32
|
|
"0bqz64q2szzhf91zyqyssmvrz7da6442rs01808pf3wrdq28bclh"))))
|
|
(build-system asdf-build-system/sbcl)
|
|
(inputs
|
|
`(("alexandria" ,sbcl-alexandria)
|
|
("iterate" ,sbcl-iterate)
|
|
("metabang-bind" ,sbcl-metabang-bind)
|
|
("swank" ,sbcl-slime-swank)))
|
|
(arguments
|
|
'(#:phases
|
|
(modify-phases %standard-phases
|
|
(add-after 'unpack 'drop-unnecessary-dependency
|
|
(lambda _
|
|
(substitute* "package.lisp"
|
|
((":stefil-system") ""))
|
|
#t)))))
|
|
(home-page "https://common-lisp.net/project/stefil/index-old.shtml")
|
|
(synopsis "Simple test framework")
|
|
(description
|
|
"Stefil is a simple test framework for Common Lisp, with a focus on
|
|
interactive development.")
|
|
(license license:public-domain))))
|
|
|
|
(define-public cl-stefil
|
|
(sbcl-package->cl-source-package sbcl-stefil))
|
|
|
|
(define-public ecl-stefil
|
|
(sbcl-package->ecl-package sbcl-stefil))
|
|
|
|
(define-public sbcl-try
|
|
(let ((commit "cf2a8887d091bf297b72ef69e15012e7e849ba3b")
|
|
(revision "2"))
|
|
(package
|
|
(name "sbcl-try")
|
|
(version (git-version "0.0.1" revision commit))
|
|
(source
|
|
(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/melisgl/try")
|
|
(commit commit)))
|
|
(file-name (git-file-name "cl-try" version))
|
|
(sha256
|
|
(base32 "166i3fqwxfv9skz6yf95c95nx0jjqy1ak1131bd0sqmd582gi9mg"))))
|
|
(build-system asdf-build-system/sbcl)
|
|
(native-inputs
|
|
(list sbcl-cl-ppcre))
|
|
(inputs
|
|
(list sbcl-alexandria
|
|
sbcl-closer-mop
|
|
sbcl-ieee-floats
|
|
sbcl-mgl-pax
|
|
sbcl-trivial-gray-streams))
|
|
(arguments
|
|
`(;; FIXME: Get tests to work
|
|
#:tests? #f))
|
|
(home-page "https://github.com/melisgl/try")
|
|
(synopsis "Common Lisp test framework")
|
|
(description
|
|
"@code{Try} is a library for unit testing with equal support for
|
|
interactive and non-interactive workflows. Tests are functions, and almost
|
|
everything else is a condition, whose types feature prominently in
|
|
parameterization.")
|
|
(license license:expat))))
|
|
|
|
(define-public cl-try
|
|
(sbcl-package->cl-source-package sbcl-try))
|
|
|
|
(define-public ecl-try
|
|
(sbcl-package->ecl-package sbcl-try))
|
|
|
|
(define-public sbcl-unit-test
|
|
(let ((commit "266afaf4ac091fe0e8803bac2ae72d238144e735")
|
|
(revision "1"))
|
|
(package
|
|
(name "sbcl-unit-test")
|
|
(version (git-version "0.0.0" revision commit))
|
|
(source
|
|
(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/hanshuebner/unit-test")
|
|
(commit commit)))
|
|
(file-name (git-file-name "unit-test" version))
|
|
(sha256
|
|
(base32 "11hpksz56iqkv7jw25p2a8r3n9dj922fyarn16d98589g6hdskj9"))))
|
|
(build-system asdf-build-system/sbcl)
|
|
(home-page "https://github.com/hanshuebner/unit-test")
|
|
(synopsis "Unit-testing framework for Common Lisp")
|
|
(description "This is a unit-testing framework for Common Lisp.")
|
|
(license license:unlicense))))
|
|
|
|
(define-public ecl-unit-test
|
|
(sbcl-package->ecl-package sbcl-unit-test))
|
|
|
|
(define-public cl-unit-test
|
|
(sbcl-package->cl-source-package sbcl-unit-test))
|
|
|
|
(define-public sbcl-xlunit
|
|
(let ((commit "3805d34b1d8dc77f7e0ee527a2490194292dd0fc")
|
|
(revision "1"))
|
|
(package
|
|
(name "sbcl-xlunit")
|
|
(version (git-version "0.6.3" revision commit))
|
|
(source
|
|
(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "http://git.kpe.io/xlunit.git")
|
|
(commit commit)))
|
|
(file-name (git-file-name name version))
|
|
(sha256
|
|
(base32
|
|
"0argfmp9nghs4sihyj3f8ch9qfib2b7ll07v5m9ziajgzsfl5xw3"))
|
|
(modules '((guix build utils)))
|
|
(snippet
|
|
;; The useless bundled debian folder drags `make' into the closure.
|
|
`(begin
|
|
(delete-file-recursively "debian")
|
|
#t))))
|
|
(build-system asdf-build-system/sbcl)
|
|
(arguments
|
|
'(#:phases
|
|
(modify-phases %standard-phases
|
|
(add-after 'unpack 'fix-tests
|
|
(lambda _
|
|
(substitute* "xlunit.asd"
|
|
((" :force t") ""))
|
|
#t)))))
|
|
(synopsis "Unit testing package for Common Lisp")
|
|
(description
|
|
"The XLUnit package is a toolkit for building test suites. It is based
|
|
on the XPTest package by Craig Brozensky and the JUnit package by Kent Beck.")
|
|
(home-page "https://quickdocs.org/xlunit/")
|
|
(license license:bsd-3))))
|
|
|
|
(define-public cl-xlunit
|
|
(sbcl-package->cl-source-package sbcl-xlunit))
|
|
|
|
(define-public ecl-xlunit
|
|
(sbcl-package->ecl-package sbcl-xlunit))
|
|
|
|
(define-public sbcl-lisp-critic
|
|
(let ((commit "ea19f82a168a6119ac1b10d0f457c01a7119602f")
|
|
(revision "1"))
|
|
(package
|
|
(name "sbcl-lisp-critic")
|
|
(version (git-version "1.1" revision commit))
|
|
(source
|
|
(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/g000001/lisp-critic")
|
|
(commit commit)))
|
|
(file-name (git-file-name name version))
|
|
(sha256
|
|
(base32 "15zg05pqfs2dhc5j7gfkwjmxawaizjpyb0p7386mpl4w93l9h84l"))))
|
|
(build-system asdf-build-system/sbcl)
|
|
(synopsis "Common Lisp linter")
|
|
(description "The Lisp Critic scans your code for instances of bad
|
|
Lisp programming practice.")
|
|
(home-page
|
|
"https://courses.cs.northwestern.edu/325/exercises/critic.html#critic")
|
|
(license license:expat))))
|
|
|
|
(define-public cl-lisp-critic
|
|
(sbcl-package->cl-source-package sbcl-lisp-critic))
|
|
|
|
(define-public ecl-lisp-critic
|
|
(sbcl-package->ecl-package sbcl-lisp-critic))
|