projects/guix·blob java-team · refs

1260 lines · 43.2 KiB

1;;; GNU Guix --- Functional package management for GNU
2;;; Copyright © 2016, 2017 Andy Patterson <[email protected]>
3;;; Copyright © 2018, 2020 Efraim Flashner <[email protected]>
4;;; Copyright © 2018, 2019, 2020, 2021, 2022 Pierre Neidhardt <[email protected]>
5;;; Copyright © 2018 Pierre Langlois <[email protected]>
6;;; Copyright © 2019 Tobias Geerinckx-Rice <[email protected]>
7;;; Copyright © 2019, 2020 Katherine Cox-Buday <[email protected]>
8;;; Copyright © 2019, 2020, 2021, 2022 Guillaume Le Vaillant <[email protected]>
9;;; Copyright © 2021, 2023 Sharlatan Hellseher <[email protected]>
10;;; Copyright © 2021 Charles Jackson <[email protected]>
11;;; Copyright © 2022, 2025 jgart <[email protected]>
12;;; Copyright © 2022, 2023 André A. Gomes <[email protected]>
13;;; Copyright © 2023 Cage <[email protected]>
14;;;
15;;; This file is part of GNU Guix.
16;;;
17;;; GNU Guix is free software; you can redistribute it and/or modify it
18;;; under the terms of the GNU General Public License as published by
19;;; the Free Software Foundation; either version 3 of the License, or (at
20;;; your option) any later version.
21;;;
22;;; GNU Guix is distributed in the hope that it will be useful, but
23;;; WITHOUT ANY WARRANTY; without even the implied warranty of
24;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
25;;; GNU General Public License for more details.
26;;;
27;;; You should have received a copy of the GNU General Public License
28;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
29
30;;; This module only contains Common Lisp libraries related to code testing
31;;; facilities.
32
33(define-module (gnu packages lisp-check)
34 #:use-module (gnu packages)
35 #:use-module ((guix licenses) #:prefix license:)
36 #:use-module (gnu packages lisp-xyz)
37 #:use-module (guix packages)
38 #:use-module (guix git-download)
39 #:use-module (guix build-system asdf))
40
41(define-public sbcl-1am
42 (let ((commit "8b1da94eca4613fd8a20bdf63f0e609e379b0ba5"))
43 (package
44 (name "sbcl-1am")
45 (version (git-version "0.0" "1" commit))
46 (source
47 (origin
48 (method git-fetch)
49 (uri (git-reference
50 (url "https://github.com/lmj/1am")
51 (commit commit)))
52 (file-name (git-file-name name version))
53 (sha256
54 (base32
55 "05ss4nz1jb9kb796295482b62w5cj29msfj8zis33sp2rw2vmv2g"))))
56 (build-system asdf-build-system/sbcl)
57 (home-page "https://github.com/lmj/1am")
58 (synopsis "Minimal testing framework for Common Lisp")
59 (description "A minimal testing framework for Common Lisp.")
60 (license license:expat))))
61
62(define-public cl-1am
63 (sbcl-package->cl-source-package sbcl-1am))
64
65(define-public ecl-1am
66 (sbcl-package->ecl-package sbcl-1am))
67
68(define-public clasp-1am
69 (sbcl-package->clasp-package sbcl-1am))
70
71(define-public sbcl-2am
72 (let ((commit "1d2fd21bbd8f26ec91b962705cab098dd7b5f11c")
73 (revision "0"))
74 (package
75 (name "sbcl-2am")
76 (version (git-version "0.0.0" revision commit))
77 (source
78 (origin
79 (method git-fetch)
80 (uri (git-reference
81 (url "https://gitlab.common-lisp.net/dkochmanski/2am")
82 (commit commit)))
83 (file-name (git-file-name "cl-2am" version))
84 (sha256
85 (base32 "0zgx4ymyzvfg44z36yr4l87cd9mprajd7sycr2zc67ab6330rynf"))))
86 (build-system asdf-build-system/sbcl)
87 (home-page "https://gitlab.common-lisp.net/dkochmanski/2am")
88 (synopsis "Small testing framework based on 1am")
89 (description
90 "This is a small testing framework for Common Lisp. The entire API
91consists of: @code{test}, @code{is}, @code{signals}, @code{finishes},
92@code{run}, @code{suite} and @code{setf suite}.")
93 (license license:expat))))
94
95(define-public cl-2am
96 (sbcl-package->cl-source-package sbcl-2am))
97
98(define-public ecl-2am
99 (sbcl-package->ecl-package sbcl-2am))
100
101(define-public clasp-2am
102 (sbcl-package->clasp-package sbcl-2am))
103
104(define-public sbcl-assertion-error
105 (let ((commit "8eab692a990d4caa193a46bae99af3e13e717b86")
106 (revision "1"))
107 (package
108 (name "sbcl-assertion-error")
109 (version (git-version "0.1.0" revision commit))
110 (source
111 (origin
112 (method git-fetch)
113 (uri (git-reference
114 (url "https://github.com/noloop/assertion-error")
115 (commit commit)))
116 (file-name (git-file-name "assertion-error" version))
117 (sha256
118 (base32 "0ix23kkakmf4nwx852zsssb831jvajr3qyppqfyks7y1ls617svn"))))
119 (build-system asdf-build-system/sbcl)
120 (inputs (list sbcl-dissect))
121 (home-page "https://github.com/noloop/assertion-error")
122 (synopsis "Error pattern for assertion libraries in Common Lisp")
123 (description "This package provides a Common Lisp assertion system with
124minimal dependencies on DISSECT.")
125 (license license:gpl3))))
126
127(define-public ecl-assertion-error
128 (sbcl-package->ecl-package sbcl-assertion-error))
129
130(define-public clasp-assertion-error
131 (sbcl-package->clasp-package sbcl-assertion-error))
132
133(define-public cl-assertion-error
134 (sbcl-package->cl-source-package sbcl-assertion-error))
135
136(define-public sbcl-assert-p
137 (package
138 (name "sbcl-assert-p")
139 (version "1.0.1")
140 (source
141 (origin
142 (method git-fetch)
143 (uri (git-reference
144 (url "https://github.com/noloop/assert-p")
145 (commit (string-append "v" version))))
146 (file-name (git-file-name "assert-p" version))
147 (sha256
148 (base32 "1x24rkqkqiw8zd26swi9rmhfplkmr5scz3bhjwccah9d2s36b1xs"))))
149 (build-system asdf-build-system/sbcl)
150 (inputs (list sbcl-assertion-error sbcl-simplet))
151 (home-page "https://github.com/noloop/assert-p")
152 (synopsis "Common Lisp assertion library")
153 (description "This package provides a Common Lisp collection of assertions.")
154 (license license:gpl3)))
155
156(define-public ecl-assert-p
157 (sbcl-package->ecl-package sbcl-assert-p))
158
159(define-public cl-assert-p
160 (sbcl-package->cl-source-package sbcl-assert-p))
161
162(define-public sbcl-cacau
163 (package
164 (name "sbcl-cacau")
165 (version "1.0.0")
166 (source
167 (origin
168 (method git-fetch)
169 (uri (git-reference
170 (url "https://github.com/noloop/cacau")
171 (commit (string-append "v" version))))
172 (file-name (git-file-name "cacau" version))
173 (sha256
174 (base32 "0m8v1xw68cr5ldv045rxgvnhigr4iahh7v6v32z6xlq2sj6r55x0"))))
175 (build-system asdf-build-system/sbcl)
176 (native-inputs (list sbcl-assert-p))
177 (inputs (list sbcl-assertion-error sbcl-eventbus))
178 (home-page "https://github.com/noloop/cacau")
179 (synopsis "Common Lisp test runner")
180 (description
181 "This package provides a Common Lisp testing framework system CACAU which was
182built to be independent of assertions systems.")
183 (license license:gpl3)))
184
185(define-public ecl-cacau
186 (sbcl-package->ecl-package sbcl-cacau))
187
188(define-public cl-cacau
189 (sbcl-package->cl-source-package sbcl-cacau))
190
191(define-public sbcl-check-it
192 (let ((commit "b79c9103665be3976915b56b570038f03486e62f"))
193 (package
194 (name "sbcl-check-it")
195 (version (git-version "0.1.0" "1" commit))
196 (source
197 (origin
198 (method git-fetch)
199 (uri (git-reference
200 (url "https://github.com/DalekBaldwin/check-it/")
201 (commit commit)))
202 (file-name (git-file-name name version))
203 (sha256
204 (base32 "1kbjwpniffdpv003igmlz5r0vy65m7wpfnhg54fhwirp1227hgg7"))))
205 (build-system asdf-build-system/sbcl)
206 (inputs
207 (list sbcl-alexandria sbcl-closer-mop sbcl-optima))
208 (native-inputs
209 (list sbcl-stefil))
210 (home-page "https://github.com/arclanguage/Clamp")
211 (synopsis "Randomized specification-based testing for Common Lisp")
212 (description
213 "This is a randomized property-based testing library for Common Lisp.
214Rather than being a full-fledged general test framework in its own right, it's
215designed to embed randomized tests in whatever framework you like.")
216 (license license:llgpl))))
217
218(define-public cl-check-it
219 (sbcl-package->cl-source-package sbcl-check-it))
220
221(define-public ecl-check-it
222 (sbcl-package->ecl-package sbcl-check-it))
223
224(define-public sbcl-checkl
225 (let ((commit "80328800d047fef9b6e32dfe6bdc98396aee3cc9")
226 (revision "1"))
227 (package
228 (name "sbcl-checkl")
229 (version (git-version "0.0.0" revision commit))
230 (source
231 (origin
232 (method git-fetch)
233 (uri (git-reference
234 (url "https://github.com/rpav/CheckL")
235 (commit commit)))
236 (file-name (git-file-name name version))
237 (sha256
238 (base32 "0bpisihx1gay44xmyr1dmhlwh00j0zzi04rp9fy35i95l2r4xdlx"))))
239 (build-system asdf-build-system/sbcl)
240 (arguments
241 ;; Error while trying to load definition for system checkl-test from
242 ;; pathname [...]/checkl-test.asd: The function CHECKL:DEFINE-TEST-OP
243 ;; is undefined.
244 '(#:tests? #f))
245 (native-inputs
246 (list sbcl-fiveam))
247 (inputs
248 (list sbcl-marshal))
249 (home-page "https://github.com/rpav/CheckL/")
250 (synopsis "Dynamic testing for Common Lisp")
251 (description
252 "CheckL lets you write tests dynamically, it checks resulting values
253against the last run.")
254 ;; The author specifies both LLGPL and "BSD", but the "BSD" license
255 ;; isn't specified anywhere, so I don't know which kind. LLGPL is the
256 ;; stronger of the two and so I think only listing this should suffice.
257 (license license:llgpl))))
258
259(define-public cl-checkl
260 (sbcl-package->cl-source-package sbcl-checkl))
261
262(define-public ecl-checkl
263 (sbcl-package->ecl-package sbcl-checkl))
264
265(define-public sbcl-cl-mock
266 (let ((commit "01762fda96718fefd3745ce4a20a4013a865b109")
267 (revision "0"))
268 (package
269 (name "sbcl-cl-mock")
270 (version (git-version "1.1.0" revision commit))
271 (source
272 (origin
273 (method git-fetch)
274 (uri (git-reference
275 (url "https://github.com/Ferada/cl-mock/")
276 (commit commit)))
277 (file-name (git-file-name "cl-mock" version))
278 (sha256
279 (base32 "19641sm3klx9yfk8lr376rfkd26vy72yp1hkpkqcw3q3m1xrf9xp"))))
280 (build-system asdf-build-system/sbcl)
281 (arguments
282 `(#:asd-systems '("cl-mock" "cl-mock-basic")))
283 (inputs
284 (list sbcl-alexandria
285 sbcl-bordeaux-threads
286 sbcl-closer-mop
287 sbcl-trivia))
288 (native-inputs
289 (list sbcl-fiveam))
290 (home-page "https://github.com/Ferada/cl-mock")
291 (synopsis "Mocking functions for Common Lisp testing")
292 (description
293 "This small library provides a way to replace the actual implementation
294of either regular or generic functions with mocks.")
295 (license license:agpl3))))
296
297(define-public ecl-cl-mock
298 (sbcl-package->ecl-package sbcl-cl-mock))
299
300(define-public cl-mock
301 (sbcl-package->cl-source-package sbcl-cl-mock))
302
303(define-public sbcl-cl-quickcheck
304 (let ((commit "807b2792a30c883a2fbecea8e7db355b50ba662f")
305 (revision "1"))
306 (package
307 (name "sbcl-cl-quickcheck")
308 (version (git-version "0.0.4" revision commit))
309 (source
310 (origin
311 (method git-fetch)
312 (uri (git-reference
313 (url "https://github.com/mcandre/cl-quickcheck")
314 (commit commit)))
315 (file-name (git-file-name name version))
316 (sha256
317 (base32
318 "165lhypq5xkcys6hvzb3jq7ywnmqvzaflda29qk2cbs3ggas4767"))))
319 (build-system asdf-build-system/sbcl)
320 (synopsis
321 "Common Lisp port of the QuickCheck unit test framework")
322 (description
323 "Common Lisp port of the QuickCheck unit test framework")
324 (home-page "https://github.com/mcandre/cl-quickcheck")
325 ;; MIT
326 (license license:expat))))
327
328(define-public cl-quickcheck
329 (sbcl-package->cl-source-package sbcl-cl-quickcheck))
330
331(define-public ecl-cl-quickcheck
332 (sbcl-package->ecl-package sbcl-cl-quickcheck))
333
334(define-public clasp-cl-quickcheck
335 (sbcl-package->clasp-package sbcl-cl-quickcheck))
336
337(define-public sbcl-clunit
338 (let ((commit "6f6d72873f0e1207f037470105969384f8380628")
339 (revision "1"))
340 (package
341 (name "sbcl-clunit")
342 (version (git-version "0.2.3" revision commit))
343 (source
344 (origin
345 (method git-fetch)
346 (uri (git-reference
347 (url "https://github.com/tgutu/clunit")
348 (commit commit)))
349 (file-name (git-file-name name version))
350 (sha256
351 (base32
352 "1idf2xnqzlhi8rbrqmzpmb3i1l6pbdzhhajkmhwbp6qjkmxa4h85"))))
353 (build-system asdf-build-system/sbcl)
354 (synopsis "CLUnit is a Common Lisp unit testing framework")
355 (description
356 "CLUnit is a Common Lisp unit testing framework. It is designed
357to be easy to use so that you can quickly start testing. CLUnit
358provides a rich set of features aimed at improving your unit testing
359experience.")
360 (home-page "https://tgutu.github.io/clunit/")
361 ;; MIT License
362 (license license:expat))))
363
364(define-public cl-clunit
365 (sbcl-package->cl-source-package sbcl-clunit))
366
367(define-public ecl-clunit
368 (sbcl-package->ecl-package sbcl-clunit))
369
370(define-public clasp-clunit
371 (sbcl-package->clasp-package sbcl-clunit))
372
373(define-public sbcl-clunit2
374 (let ((commit "dd654e199aa3cbbdbcb0c2d8e1d240745bff75e8")
375 (revision "1"))
376 (package
377 (name "sbcl-clunit2")
378 (version (git-version "0.7.0" revision commit))
379 (source
380 (origin
381 (method git-fetch)
382 (uri (git-reference
383 (url "https://codeberg.org/cage/clunit2.git")
384 (commit commit)))
385 (file-name (git-file-name "cl-clunit2" version))
386 (sha256
387 (base32 "0xm9jsy2wsvbbf8cgln6601a1rbyiz8hk17vh0lm747sqhg2vxc5"))))
388 (build-system asdf-build-system/sbcl)
389 (synopsis "Unit testing framework for Common Lisp")
390 (description
391 "CLUnit2 is a Common Lisp unit testing framework. It is designed to be
392easy to use so that you can quickly start testing.")
393 (home-page "https://codeberg.org/cage/clunit2")
394 (license license:expat))))
395
396(define-public cl-clunit2
397 (sbcl-package->cl-source-package sbcl-clunit2))
398
399(define-public ecl-clunit2
400 (sbcl-package->ecl-package sbcl-clunit2))
401
402(define-public clasp-clunit2
403 (sbcl-package->clasp-package sbcl-clunit2))
404
405(define-public sbcl-confidence
406 (let ((commit "5cbc74715348e12e689afb2d459dcb216c640a44")
407 (revision "0"))
408 (package
409 (name "sbcl-confidence")
410 (version (git-version "0.0.0" revision commit))
411 (source
412 (origin
413 (method git-fetch)
414 (uri (git-reference
415 (url "https://github.com/melusina-org/cl-confidence")
416 (commit commit)))
417 (file-name (git-file-name "cl-confidence" version))
418 (sha256
419 (base32 "0zc135rvq2valrw15bh8k6i53v7kk5l7x0kccb1bf7pglc8zgivs"))))
420 (build-system asdf-build-system/sbcl)
421 (arguments
422 `(#:asd-systems '("org.melusina.confidence"
423 "org.melusina.confidence/testsuite")))
424 (inputs (list sbcl-alexandria))
425 (home-page "https://github.com/melusina-org/cl-confidence")
426 (synopsis "Interactive test framework for Common Lisp")
427 (description
428 "Confidence is a test framework for Common Lisp that focuses on
429simplicity. It avoids bureaucracy and makes it easy to work interactively,
430without a complicated setup, and with explicit functions and decisions.")
431 (license license:expat))))
432
433(define-public ecl-confidence
434 (sbcl-package->ecl-package sbcl-confidence))
435
436(define-public cl-confidence
437 (sbcl-package->cl-source-package sbcl-confidence))
438
439(define-public clasp-confidence
440 (sbcl-package->clasp-package sbcl-confidence))
441
442(define-public sbcl-eos
443 (let ((commit "b4413bccc4d142cbe1bf49516c3a0a22c9d99243")
444 (revision "2"))
445 (package
446 (name "sbcl-eos")
447 (version (git-version "0.0.0" revision commit))
448 (source
449 (origin
450 (method git-fetch)
451 (uri (git-reference
452 (url "https://github.com/adlai/Eos")
453 (commit commit)))
454 (sha256
455 (base32 "1afllvmlnx97yzz404gycl3pa3kwx427k3hrbf37rpmjlv47knhk"))
456 (file-name (git-file-name "eos" version))))
457 (build-system asdf-build-system/sbcl)
458 (synopsis "Unit Testing for Common Lisp")
459 (description
460 "Eos was a unit testing library for Common Lisp.
461It began as a fork of FiveAM; however, FiveAM development has continued, while
462that of Eos has not. Thus, Eos is now deprecated in favor of FiveAM.")
463 (home-page "https://github.com/adlai/Eos")
464 (license license:expat))))
465
466(define-public cl-eos
467 (sbcl-package->cl-source-package sbcl-eos))
468
469(define-public ecl-eos
470 (sbcl-package->ecl-package sbcl-eos))
471
472(define-public clasp-eos
473 (sbcl-package->clasp-package sbcl-eos))
474
475(define-public sbcl-fiasco
476 (let ((commit "bb47d2fef4eb24cc16badc1c9a73d73c3a7e18f5")
477 (revision "2"))
478 (package
479 (name "sbcl-fiasco")
480 (version (git-version "0.0.1" revision commit))
481 (source
482 (origin
483 (method git-fetch)
484 (uri (git-reference
485 (url "https://github.com/joaotavora/fiasco")
486 (commit commit)))
487 (file-name (git-file-name "fiasco" version))
488 (sha256
489 (base32
490 "1k8i2kq57201bvy3zfpsxld530hd104dgbglxigqb6i408c1a7aw"))))
491 (build-system asdf-build-system/sbcl)
492 (inputs
493 (list sbcl-alexandria sbcl-trivial-gray-streams))
494 (synopsis "Simple and powerful test framework for Common Lisp")
495 (description "A Common Lisp test framework that treasures your failures,
496logical continuation of Stefil. It focuses on interactive debugging.")
497 (home-page "https://github.com/joaotavora/fiasco")
498 ;; LICENCE specifies this is public-domain unless the legislation
499 ;; doesn't allow or recognize it. In that case it falls back to a
500 ;; permissive licence.
501 (license (list license:public-domain
502 (license:x11-style "file://LICENCE"))))))
503
504(define-public cl-fiasco
505 (sbcl-package->cl-source-package sbcl-fiasco))
506
507(define-public ecl-fiasco
508 (sbcl-package->ecl-package sbcl-fiasco))
509
510(define-public clasp-fiasco
511 (sbcl-package->clasp-package sbcl-fiasco))
512
513(define-public sbcl-fiveam
514 (package
515 (name "sbcl-fiveam")
516 (version "1.4.2")
517 (source
518 (origin
519 (method git-fetch)
520 (uri (git-reference
521 (url "https://github.com/sionescu/fiveam")
522 (commit (string-append "v" version))))
523 (file-name (git-file-name "fiveam" version))
524 (sha256
525 (base32 "04mh5plmlb15jbq3dkd8b9jl1dmbbg4hnd3k7859vpf6s12k5p4j"))))
526 (inputs
527 (list sbcl-alexandria sbcl-net.didierverna.asdf-flv
528 sbcl-trivial-backtrace))
529 (build-system asdf-build-system/sbcl)
530 (synopsis "Common Lisp testing framework")
531 (description "FiveAM is a simple (as far as writing and running tests
532goes) regression testing framework. It has been designed with Common Lisp's
533interactive development model in mind.")
534 (home-page "https://common-lisp.net/project/fiveam/")
535 (license license:bsd-3)))
536
537(define-public cl-fiveam
538 (sbcl-package->cl-source-package sbcl-fiveam))
539
540(define-public ecl-fiveam
541 (sbcl-package->ecl-package sbcl-fiveam))
542
543(define-public sbcl-hamcrest
544 (let ((commit "a54553e59a70dc5a539b683e79bfcdb0e8bae5c8")
545 (revision "0"))
546 (package
547 (name "sbcl-hamcrest")
548 (version "0.4.4")
549 (source
550 (origin
551 (method git-fetch)
552 (uri (git-reference
553 (url "https://github.com/40ants/cl-hamcrest")
554 (commit commit)))
555 (sha256
556 (base32 "181nnb2fjbsdqjqdvwg2x9n1jjalkfzszwdgqcap4py2q63q1kxj"))
557 (file-name (git-file-name "cl-hamcrest" commit))))
558 (build-system asdf-build-system/sbcl)
559 (inputs
560 (list sbcl-iterate
561 sbcl-split-sequence
562 sbcl-cl-ppcre
563 sbcl-alexandria
564 sbcl-rove
565 sbcl-prove))
566 (home-page "https://40ants.com/cl-hamcrest/")
567 (synopsis "Make CL unit tests more readable")
568 (description
569 "@code{cl-hamcrest} is an implementation of the Hamcrest idea in
570Common Lisp. It simplifies unit tests and makes them more readable.
571Hamcrest uses the idea of pattern-matching, to construct matchers from
572different pieces and to apply them to the data.")
573 (license license:bsd-3))))
574
575(define-public cl-hamcrest
576 (sbcl-package->cl-source-package sbcl-hamcrest))
577
578(define-public ecl-cl-hamcrest
579 (sbcl-package->ecl-package sbcl-hamcrest))
580
581(define-public sbcl-hu.dwim.stefil
582 (let ((commit "414902c6f575818c39a8a156b8b61b1adfa73dad"))
583 (package
584 (name "sbcl-hu.dwim.stefil")
585 (version (git-version "0.0.0" "2" commit))
586 (source
587 (origin
588 (method git-fetch)
589 (uri
590 (git-reference
591 (url "https://github.com/hu-dwim/hu.dwim.stefil")
592 (commit commit)))
593 (sha256
594 (base32 "14izmjjim590rh74swrssavdmdznj2z8vhqixy780sjhpcr5pmkc"))
595 (file-name (git-file-name "hu.dwim.stefil" version))))
596 (build-system asdf-build-system/sbcl)
597 (native-inputs
598 (list sbcl-hu.dwim.asdf))
599 (inputs
600 (list sbcl-alexandria))
601 (home-page "http://dwim.hu/project/hu.dwim.stefil")
602 (synopsis "Simple test framework")
603 (description "Stefil is a simple test framework for Common Lisp,
604with a focus on interactive development.")
605 (license license:public-domain))))
606
607(define-public cl-hu.dwim.stefil
608 (sbcl-package->cl-source-package sbcl-hu.dwim.stefil))
609
610(define-public ecl-hu.dwim.stefil
611 (sbcl-package->ecl-package sbcl-hu.dwim.stefil))
612
613(define-public clasp-hu.dwim.stefil
614 (sbcl-package->clasp-package sbcl-hu.dwim.stefil))
615
616(define-public sbcl-kaputt
617 (let ((commit "f26c9b0f8219fe61d86249198ef85174eecafc10")
618 (revision "1"))
619 (package
620 (name "sbcl-kaputt")
621 (version (git-version "0.0.0" revision commit))
622 (source
623 (origin
624 (method git-fetch)
625 (uri (git-reference
626 (url "https://github.com/foretspaisibles/cl-kaputt")
627 (commit commit)))
628 (file-name (git-file-name "kaputt" version))
629 (sha256
630 (base32 "10a78032vnf12kjjpfmq9ign38cad237ycyq37dwnx922nxjjaj4"))))
631 (build-system asdf-build-system/sbcl)
632 (inputs
633 (list sbcl-cl-ppcre))
634 (home-page "https://github.com/foretspaisibles/cl-kaputt")
635 (synopsis "Simple interactive test framework for Common Lisp")
636 (description
637 "KAPUTT is a test framework for Common Lisp that focuses on the
638following features:
639
640@itemize
641@item KAPUTT is simple, it only defines three abstractions testcase, assertion
642and protocol and does not add any artefact on the backtrace when errors occur.
643
644@item KAPUTT is extensible, it is possible to add problem-specific assertions
645to make test code more informative.
646
647@item KAPUTT fits well interactive development.
648@end itemize\n")
649 (license license:cecill-b))))
650
651(define-public ecl-kaputt
652 (sbcl-package->ecl-package sbcl-kaputt))
653
654(define-public clasp-kaputt
655 (sbcl-package->clasp-package sbcl-kaputt))
656
657(define-public cl-kaputt
658 (sbcl-package->cl-source-package sbcl-kaputt))
659
660(define-public sbcl-lift
661 (let ((commit "a7941845a9de72be60e66ea941aa34cbee35bf23")
662 (revision "3"))
663 (package
664 (name "sbcl-lift")
665 (version (git-version "1.7.1" revision commit))
666 (source
667 (origin
668 (method git-fetch)
669 (uri (git-reference
670 (url "https://github.com/hraban/lift")
671 (commit commit)))
672 (sha256
673 (base32 "1513n46fkqw8rnvz69s7xnwj476qm8ibdlwsr63qj9yh0mib0q6x"))
674 (file-name (git-file-name "lift" version))
675 (modules '((guix build utils)))
676 (snippet
677 ;; Don't keep the bundled website
678 `(begin
679 (delete-file-recursively "website")
680 #t))))
681 (build-system asdf-build-system/sbcl)
682 (arguments
683 ;; The tests require a debugger, but we run with the debugger disabled.
684 '(#:tests? #f))
685 (synopsis "LIsp Framework for Testing")
686 (description
687 "The LIsp Framework for Testing (LIFT) is a unit and system test tool for LISP.
688Though inspired by SUnit and JUnit, it's built with Lisp in mind. In LIFT,
689testcases are organized into hierarchical testsuites each of which can have
690its own fixture. When run, a testcase can succeed, fail, or error. LIFT
691supports randomized testing, benchmarking, profiling, and reporting.")
692 (home-page "https://github.com/gwkkwg/lift")
693 (license license:expat))))
694
695(define-public cl-lift
696 (sbcl-package->cl-source-package sbcl-lift))
697
698(define-public ecl-lift
699 (sbcl-package->ecl-package sbcl-lift))
700
701(define-public sbcl-lisp-unit
702 (let ((commit "89653a232626b67400bf9a941f9b367da38d3815"))
703 (package
704 (name "sbcl-lisp-unit")
705 (version (git-version "0.0.0" "1" commit))
706 (source
707 (origin
708 (method git-fetch)
709 (uri (git-reference
710 (url "https://github.com/OdonataResearchLLC/lisp-unit")
711 (commit commit)))
712 (sha256
713 (base32
714 "0p6gdmgr7p383nvd66c9y9fp2bjk4jx1lpa5p09g43hr9y9pp9ry"))
715 (file-name (git-file-name "lisp-unit" version))))
716 (build-system asdf-build-system/sbcl)
717 (synopsis "Common Lisp Test framework inspired by JUnit to be simple of use")
718 (description
719 "@command{lisp-unit} is a Common Lisp library that supports unit
720testing. It is an extension of the library written by Chris Riesbeck.")
721 (home-page "https://github.com/OdonataResearchLLC/lisp-unit")
722 (license license:expat))))
723
724(define-public cl-lisp-unit
725 (sbcl-package->cl-source-package sbcl-lisp-unit))
726
727(define-public ecl-lisp-unit
728 (sbcl-package->ecl-package sbcl-lisp-unit))
729
730(define-public clasp-lisp-unit
731 (sbcl-package->clasp-package sbcl-lisp-unit))
732
733(define-public sbcl-lisp-unit2
734 (package
735 (name "sbcl-lisp-unit2")
736 (version "0.9.5")
737 (source
738 (origin
739 (method git-fetch)
740 (uri (git-reference
741 (url "https://codeberg.org/aadcg/lisp-unit2")
742 (commit version)))
743 (file-name (git-file-name "cl-lisp-unit2" version))
744 (sha256
745 (base32 "025mnzxdvi9n6g6myjdh35pkpipaa2ynd060d5zrljx9fpilln38"))))
746 (build-system asdf-build-system/sbcl)
747 (inputs
748 (list sbcl-alexandria sbcl-cl-interpol sbcl-iterate))
749 (synopsis "Test Framework for Common Lisp")
750 (description
751 "LISP-UNIT2 is a Common Lisp library that supports unit testing in the
752style of JUnit for Java. It is a new version of the lisp-unit library written
753by Chris Riesbeck.")
754 (home-page "https://codeberg.org/aadcg/lisp-unit2")
755 (license license:expat)))
756
757(define-public cl-lisp-unit2
758 (sbcl-package->cl-source-package sbcl-lisp-unit2))
759
760(define-public ecl-lisp-unit2
761 (sbcl-package->ecl-package sbcl-lisp-unit2))
762
763(define-public sbcl-nst
764 (let ((commit "6c0990f594abcf5887e8d80f1035e3b60454b61b")
765 (revision "1"))
766 (package
767 (name "sbcl-nst")
768 (version (git-version "4.1.2" revision commit))
769 (source
770 (origin
771 (method git-fetch)
772 (uri (git-reference
773 (url "https://github.com/jphmrst/cl-nst")
774 (commit commit)))
775 (file-name (git-file-name "nst" version))
776 (sha256
777 (base32 "1hf3r6pqbnd9vsd1i24qmz928kia72hdgmiafiwb6jw1hmj3r6ga"))))
778 (build-system asdf-build-system/sbcl)
779 (inputs
780 (list sbcl-closer-mop sbcl-org-sampler))
781 (home-page "https://github.com/jphmrst/cl-nst")
782 (synopsis "Unit testing for Common Lisp")
783 (description
784 "NST is a unit/regression testing system for Common Lisp.")
785 (license license:llgpl))))
786
787(define-public ecl-nst
788 (sbcl-package->ecl-package sbcl-nst))
789
790(define-public cl-nst
791 (sbcl-package->cl-source-package sbcl-nst))
792
793(define-public sbcl-parachute
794 (let ((commit "dd925cb74e08fb74c1e566f0984d120a33c4034e")
795 (revision "3"))
796 (package
797 (name "sbcl-parachute")
798 (version (git-version "1.5.0" revision commit))
799 (source
800 (origin
801 (method git-fetch)
802 (uri
803 (git-reference
804 (url "https://codeberg.org/shinmera/parachute")
805 (commit commit)))
806 (file-name (git-file-name "cl-parachute" version))
807 (sha256
808 (base32 "0d1y9999c1pk25dj2f2g6x1zcd3dh3xk17pqd2mxd7v7649qg8x5"))))
809 (build-system asdf-build-system/sbcl)
810 (inputs
811 (list sbcl-documentation-utils
812 sbcl-form-fiddle
813 sbcl-trivial-custom-debugger))
814 (synopsis "Extensible and cross-compatible testing framework for Common Lisp")
815 (description
816 "Parachute is a simple-to-use and extensible testing framework.
817In Parachute, things are organised as a bunch of named tests within a package.
818Each test can contain a bunch of test forms that make up its body.")
819 (home-page "https://shinmera.com/docs/parachute/")
820 (license license:zlib))))
821
822(define-public cl-parachute
823 (sbcl-package->cl-source-package sbcl-parachute))
824
825(define-public ecl-parachute
826 (sbcl-package->ecl-package sbcl-parachute))
827
828(define-public clasp-parachute
829 (sbcl-package->clasp-package sbcl-parachute))
830
831(define-public sbcl-prove
832 (let ((commit "5d71f02795b89e36f34e8c7d50e69b67ec6ca2de")
833 (revision "2"))
834 (package
835 (name "sbcl-prove")
836 (version (git-version "1.0.0" revision commit))
837 (source
838 (origin
839 (method git-fetch)
840 (uri (git-reference
841 (url "https://github.com/fukamachi/prove")
842 (commit commit)))
843 (sha256
844 (base32 "0ca6ha3zhmckq3ad9lxm6sbg4i0hg3m81xhan4dkxd3x9898jzpc"))
845 (file-name (git-file-name "prove" version))))
846 (build-system asdf-build-system/sbcl)
847 (inputs
848 (list sbcl-alexandria sbcl-cl-colors sbcl-cl-ppcre
849 sbcl-cl-ansi-text))
850 (synopsis "Yet another unit testing framework for Common Lisp")
851 (description
852 "This project was originally called @command{cl-test-more}.
853@command{prove} is yet another unit testing framework for Common Lisp. The
854advantages of @command{prove} are:
855
856@itemize
857@item Various simple functions for testing and informative error messages
858@item ASDF integration
859@item Extensible test reporters
860@item Colorizes the report if it's available (note for SLIME)
861@item Reports test durations
862@end itemize\n")
863 (home-page "https://github.com/fukamachi/prove")
864 (license license:expat))))
865
866(define-public cl-prove
867 (sbcl-package->cl-source-package sbcl-prove))
868
869(define-public ecl-prove
870 (sbcl-package->ecl-package sbcl-prove))
871
872(define-public sbcl-ptester
873 (let ((commit "fe69fde54f4bce00ce577feb918796c293fc7253")
874 (revision "1"))
875 (package
876 (name "sbcl-ptester")
877 (version (git-version "2.1.3" revision commit))
878 (source
879 (origin
880 (method git-fetch)
881 (uri (git-reference
882 (url "http://git.kpe.io/ptester.git")
883 (commit commit)))
884 (file-name (git-file-name name version))
885 (sha256
886 (base32 "1l0lfl7cdnr2qf4zh38hi4llxg22c49zkm639bdkmvlkzwj3ndwf"))
887 (modules '((guix build utils)))
888 (snippet
889 ;; The useless bundled debian folder drags `make' into the closure.
890 `(begin
891 (delete-file-recursively "debian")
892 #t))))
893 (build-system asdf-build-system/sbcl)
894 (home-page "https://quickdocs.org/ptester/")
895 (synopsis "Portable test harness package")
896 (description
897 "@command{ptester} is a portable testing framework based on Franz's
898tester module.")
899 (license license:llgpl))))
900
901(define-public cl-ptester
902 (sbcl-package->cl-source-package sbcl-ptester))
903
904(define-public ecl-ptester
905 (sbcl-package->ecl-package sbcl-ptester))
906
907(define-public clasp-ptester
908 (sbcl-package->clasp-package sbcl-ptester))
909
910(define-public sbcl-rove
911 (let ((commit "6a5dfcdced42879a4eff2a529e7e8ce492fadf41")
912 (revision "1"))
913 (package
914 (name "sbcl-rove")
915 (version (git-version "0.10.0" revision commit))
916 (source (origin
917 (method git-fetch)
918 (uri (git-reference
919 (url "https://github.com/fukamachi/rove")
920 (commit commit)))
921 (file-name (git-file-name "cl-rove" version))
922 (sha256
923 (base32
924 "1w99c0795ykhn14pfhyhvfzxzz0k1z1bb846xgz3iv19s0j2vykr"))))
925 (build-system asdf-build-system/sbcl)
926 (inputs (list sbcl-bordeaux-threads
927 sbcl-dissect
928 sbcl-trivial-gray-streams))
929 (home-page "https://github.com/fukamachi/rove")
930 (synopsis "Yet another common lisp testing library")
931 (description
932 "Rove is a unit testing framework for Common Lisp applications.
933This is intended to be a successor of Prove.")
934 (license license:bsd-3))))
935
936(define-public cl-rove
937 (sbcl-package->cl-source-package sbcl-rove))
938
939(define-public ecl-rove
940 (sbcl-package->ecl-package sbcl-rove))
941
942(define-public sbcl-rt
943 (let ((commit "a6a7503a0b47953bc7579c90f02a6dba1f6e4c5a")
944 (revision "1"))
945 (package
946 (name "sbcl-rt")
947 (version (git-version "1990.12.19" revision commit))
948 (source
949 (origin
950 (method git-fetch)
951 (uri (git-reference
952 (url "http://git.kpe.io/rt.git")
953 (commit commit)))
954 (file-name (git-file-name name version))
955 (sha256
956 (base32 "13si2rrxaagbr0bkvg6sqicxxpyshabx6ad6byc9n2ik5ysna69b"))
957 (modules '((guix build utils)))
958 (snippet
959 ;; The useless bundled debian folder drags `make' into the closure.
960 `(begin
961 (delete-file-recursively "debian")
962 #t))))
963 (build-system asdf-build-system/sbcl)
964 (synopsis "MIT Regression Tester")
965 (description
966 "RT provides a framework for writing regression test suites.")
967 (home-page "https://www.cliki.net/rt")
968 (license license:expat))))
969
970(define-public cl-rt
971 (sbcl-package->cl-source-package sbcl-rt))
972
973(define-public ecl-rt
974 (sbcl-package->ecl-package sbcl-rt))
975
976(define-public clasp-rt
977 (sbcl-package->clasp-package sbcl-rt))
978
979(define-public sbcl-should-test
980 (let ((commit "48facb9f9c07aeceb71fc0c48ce17fd7d54a09d4")
981 (revision "0"))
982 (package
983 (name "sbcl-should-test")
984 (version (git-version "1.0.0" revision commit))
985 (source
986 (origin
987 (method git-fetch)
988 (uri (git-reference
989 (url "https://github.com/vseloved/should-test")
990 (commit commit)))
991 (file-name (git-file-name "should-test" version))
992 (sha256
993 (base32 "1fqqa7lhf28qg60ji9libkylkcy747x576qpjn1y7c945j2fxmnm"))))
994 (build-system asdf-build-system/sbcl)
995 (inputs
996 (list sbcl-cl-ppcre sbcl-local-time sbcl-osicat sbcl-rutils))
997 (home-page "https://github.com/vseloved/should-test")
998 (synopsis "Minimal yet feature-rich Common Lisp test framework")
999 (description
1000 "SHOULD-TEST is a methodology-agnostic and non-opinionated Common Lisp
1001test framework, i.e. it doesn't care what kind of test approach you'd like to
1002take.")
1003 (license license:expat))))
1004
1005(define-public cl-should-test
1006 (sbcl-package->cl-source-package sbcl-should-test))
1007
1008(define-public ecl-should-test
1009 (sbcl-package->ecl-package sbcl-should-test))
1010
1011(define-public sbcl-simplet
1012 (package
1013 (name "sbcl-simplet")
1014 (version "1.2.0")
1015 (source
1016 (origin
1017 (method git-fetch)
1018 (uri (git-reference
1019 (url "https://github.com/noloop/simplet")
1020 (commit (string-append "v" version))))
1021 (file-name (git-file-name "simplet" version))
1022 (sha256
1023 (base32 "1iwp3a43mns885k2arr7gbmyv5rsrjfvgarxickj7r2bfgwp1cnn"))))
1024 (build-system asdf-build-system/sbcl)
1025 (home-page "https://github.com/noloop/simplet")
1026 (synopsis "Simple test runner in Common Lisp")
1027 (description "This package provides a Common Lisp test runner system
1028SIMPLET.")
1029 (license license:gpl3)))
1030
1031(define-public ecl-simplet
1032 (sbcl-package->ecl-package sbcl-simplet))
1033
1034(define-public cl-simplet
1035 (sbcl-package->cl-source-package sbcl-simplet))
1036
1037(define-public sbcl-stefil
1038 (let ((commit "0398548ec95dceb50fc2c2c03e5fb0ce49b86c7a")
1039 (revision "0"))
1040 (package
1041 (name "sbcl-stefil")
1042 (version (git-version "0.1" revision commit))
1043 (source
1044 (origin
1045 (method git-fetch)
1046 (uri (git-reference
1047 (url "https://gitlab.common-lisp.net/stefil/stefil.git")
1048 (commit commit)))
1049 (file-name (git-file-name name version))
1050 (sha256
1051 (base32
1052 "0bqz64q2szzhf91zyqyssmvrz7da6442rs01808pf3wrdq28bclh"))))
1053 (build-system asdf-build-system/sbcl)
1054 (inputs
1055 (list sbcl-alexandria
1056 sbcl-iterate
1057 sbcl-metabang-bind
1058 sbcl-slime-swank))
1059 (arguments
1060 '(#:phases
1061 (modify-phases %standard-phases
1062 (add-after 'unpack 'drop-unnecessary-dependency
1063 (lambda _
1064 (substitute* "package.lisp"
1065 ((":stefil-system") ""))
1066 #t)))))
1067 (home-page "https://common-lisp.net/project/stefil/index-old.shtml")
1068 (synopsis "Simple test framework")
1069 (description
1070 "Stefil is a simple test framework for Common Lisp, with a focus on
1071interactive development.")
1072 (license license:public-domain))))
1073
1074(define-public cl-stefil
1075 (sbcl-package->cl-source-package sbcl-stefil))
1076
1077(define-public ecl-stefil
1078 (sbcl-package->ecl-package sbcl-stefil))
1079
1080(define-public sbcl-trivial-coverage
1081 (let ((commit "b409ac34ebbd798cd645de853cc5e43510a81244")
1082 (revision "0"))
1083 (package
1084 (name "sbcl-trivial-coverage")
1085 (version (git-version "0.0.4" revision commit))
1086 (source
1087 (origin
1088 (method git-fetch)
1089 (uri (git-reference
1090 (url "https://gitlab.com/ediethelm/trivial-coverage")
1091 (commit commit)))
1092 (file-name (git-file-name "trivial-coverage" version))
1093 (sha256
1094 (base32 "1ak4mjcvzdjsjjh7j89zlnwgaamfrspxmjh2i9kg67kqn36prbsp"))))
1095 (build-system asdf-build-system/sbcl)
1096 (inputs
1097 (list sbcl-lquery))
1098 (home-page "https://gitlab.com/ediethelm/trivial-coverage")
1099 (synopsis "Print out the code coverage collected")
1100 (description
1101 "This package provides a simple Common Lisp library to print out the
1102code coverage collected.")
1103 (license license:expat))))
1104
1105(define-public cl-trivial-coverage
1106 (sbcl-package->cl-source-package sbcl-trivial-coverage))
1107
1108(define-public ecl-trivial-coverage
1109 (sbcl-package->ecl-package sbcl-trivial-coverage))
1110
1111(define-public sbcl-try
1112 (let ((commit "cf2a8887d091bf297b72ef69e15012e7e849ba3b")
1113 (revision "2"))
1114 (package
1115 (name "sbcl-try")
1116 (version (git-version "0.0.1" revision commit))
1117 (source
1118 (origin
1119 (method git-fetch)
1120 (uri (git-reference
1121 (url "https://github.com/melisgl/try")
1122 (commit commit)))
1123 (file-name (git-file-name "cl-try" version))
1124 (sha256
1125 (base32 "166i3fqwxfv9skz6yf95c95nx0jjqy1ak1131bd0sqmd582gi9mg"))))
1126 (build-system asdf-build-system/sbcl)
1127 (native-inputs
1128 (list sbcl-cl-ppcre))
1129 (inputs
1130 (list sbcl-alexandria
1131 sbcl-closer-mop
1132 sbcl-ieee-floats
1133 sbcl-mgl-pax
1134 sbcl-trivial-gray-streams))
1135 (arguments
1136 `(;; FIXME: Get tests to work
1137 #:tests? #f))
1138 (home-page "https://github.com/melisgl/try")
1139 (synopsis "Common Lisp test framework")
1140 (description
1141 "@code{Try} is a library for unit testing with equal support for
1142interactive and non-interactive workflows. Tests are functions, and almost
1143everything else is a condition, whose types feature prominently in
1144parameterization.")
1145 (license license:expat))))
1146
1147(define-public cl-try
1148 (sbcl-package->cl-source-package sbcl-try))
1149
1150(define-public ecl-try
1151 (sbcl-package->ecl-package sbcl-try))
1152
1153(define-public sbcl-unit-test
1154 (let ((commit "266afaf4ac091fe0e8803bac2ae72d238144e735")
1155 (revision "1"))
1156 (package
1157 (name "sbcl-unit-test")
1158 (version (git-version "0.0.0" revision commit))
1159 (source
1160 (origin
1161 (method git-fetch)
1162 (uri (git-reference
1163 (url "https://github.com/hanshuebner/unit-test")
1164 (commit commit)))
1165 (file-name (git-file-name "unit-test" version))
1166 (sha256
1167 (base32 "11hpksz56iqkv7jw25p2a8r3n9dj922fyarn16d98589g6hdskj9"))))
1168 (build-system asdf-build-system/sbcl)
1169 (home-page "https://github.com/hanshuebner/unit-test")
1170 (synopsis "Unit-testing framework for Common Lisp")
1171 (description "This is a unit-testing framework for Common Lisp.")
1172 (license license:unlicense))))
1173
1174(define-public ecl-unit-test
1175 (sbcl-package->ecl-package sbcl-unit-test))
1176
1177(define-public clasp-unit-test
1178 (sbcl-package->clasp-package sbcl-unit-test))
1179
1180(define-public cl-unit-test
1181 (sbcl-package->cl-source-package sbcl-unit-test))
1182
1183(define-public sbcl-xlunit
1184 (let ((commit "3805d34b1d8dc77f7e0ee527a2490194292dd0fc")
1185 (revision "1"))
1186 (package
1187 (name "sbcl-xlunit")
1188 (version (git-version "0.6.3" revision commit))
1189 (source
1190 (origin
1191 (method git-fetch)
1192 (uri (git-reference
1193 (url "http://git.kpe.io/xlunit.git")
1194 (commit commit)))
1195 (file-name (git-file-name name version))
1196 (sha256
1197 (base32
1198 "0argfmp9nghs4sihyj3f8ch9qfib2b7ll07v5m9ziajgzsfl5xw3"))
1199 (modules '((guix build utils)))
1200 (snippet
1201 ;; The useless bundled debian folder drags `make' into the closure.
1202 `(begin
1203 (delete-file-recursively "debian")
1204 #t))))
1205 (build-system asdf-build-system/sbcl)
1206 (arguments
1207 '(#:phases
1208 (modify-phases %standard-phases
1209 (add-after 'unpack 'fix-tests
1210 (lambda _
1211 (substitute* "xlunit.asd"
1212 ((" :force t") ""))
1213 #t)))))
1214 (synopsis "Unit testing package for Common Lisp")
1215 (description
1216 "The XLUnit package is a toolkit for building test suites. It is based
1217on the XPTest package by Craig Brozensky and the JUnit package by Kent Beck.")
1218 (home-page "https://quickdocs.org/xlunit/")
1219 (license license:bsd-3))))
1220
1221(define-public cl-xlunit
1222 (sbcl-package->cl-source-package sbcl-xlunit))
1223
1224(define-public ecl-xlunit
1225 (sbcl-package->ecl-package sbcl-xlunit))
1226
1227(define-public clasp-xlunit
1228 (sbcl-package->clasp-package sbcl-xlunit))
1229
1230(define-public sbcl-lisp-critic
1231 (let ((commit "ea19f82a168a6119ac1b10d0f457c01a7119602f")
1232 (revision "1"))
1233 (package
1234 (name "sbcl-lisp-critic")
1235 (version (git-version "1.1" revision commit))
1236 (source
1237 (origin
1238 (method git-fetch)
1239 (uri (git-reference
1240 (url "https://github.com/g000001/lisp-critic")
1241 (commit commit)))
1242 (file-name (git-file-name name version))
1243 (sha256
1244 (base32 "15zg05pqfs2dhc5j7gfkwjmxawaizjpyb0p7386mpl4w93l9h84l"))))
1245 (build-system asdf-build-system/sbcl)
1246 (synopsis "Common Lisp linter")
1247 (description "The Lisp Critic scans your code for instances of bad
1248 Lisp programming practice.")
1249 (home-page
1250 "https://courses.cs.northwestern.edu/325/exercises/critic.html#critic")
1251 (license license:expat))))
1252
1253(define-public cl-lisp-critic
1254 (sbcl-package->cl-source-package sbcl-lisp-critic))
1255
1256(define-public ecl-lisp-critic
1257 (sbcl-package->ecl-package sbcl-lisp-critic))
1258
1259(define-public clasp-lisp-critic
1260 (sbcl-package->clasp-package sbcl-lisp-critic))