gnu: sbcl-trivia: Fix .asd loading.

* gnu/packages/lisp.scm (sbcl-trivia): Do it.
master
Pierre Neidhardt 2019-08-02 17:45:37 +02:00
parent 6ba457cc1c
commit 000faac0a2
No known key found for this signature in database
GPG Key ID: 9BDCF497A4BBCC7F
1 changed files with 18 additions and 1 deletions

View File

@ -6563,7 +6563,24 @@ This system contains the CFFI foreign slot access extension.")))
("trivia.cffi" ,sbcl-trivia.cffi) ("trivia.cffi" ,sbcl-trivia.cffi)
("optima" ,sbcl-optima))) ("optima" ,sbcl-optima)))
(arguments (arguments
`(#:test-asd-file "trivia.test.asd")) `(#:test-asd-file "trivia.test.asd"
#:phases
(modify-phases %standard-phases
(add-after 'create-asd 'remove-component
;; XXX: The original .asd has no components, but our build system
;; creates an entry nonetheless. We need to remove it for the
;; generated .asd to load properly. See trivia.trivial for a
;; similar problem.
(lambda* (#:key outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out"))
(asd (string-append out "/lib/" (%lisp-type) "/trivia.asd")))
(substitute* asd
((" :components
")
""))
(substitute* asd
((" *\\(\\(:compiled-file \"trivia--system\"\\)\\)")
""))))))))
(description "Trivia is a pattern matching compiler that is compatible (description "Trivia is a pattern matching compiler that is compatible
with Optima, another pattern matching library for Common Lisp. It is meant to with Optima, another pattern matching library for Common Lisp. It is meant to
be faster and more extensible than Optima."))) be faster and more extensible than Optima.")))