diff options
| author | Marius Bakke <mbakke@fastmail.com> | 2020-01-12 20:57:38 +0100 |
|---|---|---|
| committer | Marius Bakke <mbakke@fastmail.com> | 2020-01-12 20:57:38 +0100 |
| commit | 8f1ab291bca31e84bec50da4374175367d498a6f (patch) | |
| tree | e96a6f7a44382646733ac08ecaccb2f57182f017 /gnu/packages/lisp-xyz.scm | |
| parent | f0bce2e08feb157b3d8b5100b1ea26bbbd6141e3 (diff) | |
| parent | 2e4bb89354d909b661208b3900abfeaa621a1582 (diff) | |
Merge branch 'master' into staging
Diffstat (limited to 'gnu/packages/lisp-xyz.scm')
| -rw-r--r-- | gnu/packages/lisp-xyz.scm | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/gnu/packages/lisp-xyz.scm b/gnu/packages/lisp-xyz.scm index 8d9cf53526..cffd43cfc7 100644 --- a/gnu/packages/lisp-xyz.scm +++ b/gnu/packages/lisp-xyz.scm @@ -3376,6 +3376,19 @@ client and server.") (build-system asdf-build-system/sbcl) (inputs `(("sbcl-lift" ,sbcl-lift))) + (arguments + `(#:phases + (modify-phases %standard-phases + (add-after 'check 'delete-test-results + (lambda* (#:key outputs #:allow-other-keys) + (let ((test-results (string-append (assoc-ref outputs "out") + "/share/common-lisp/" + (%lisp-type) "-source" + "/trivial-backtrace" + "/test-results"))) + (when (file-exists? test-results) + (delete-file-recursively test-results))) + #t))))) (home-page "https://common-lisp.net/project/trivial-backtrace/") (synopsis "Portable simple API to work with backtraces in Common Lisp") (description |