TakeV/guix
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

gnu: sbcl-trivia: Fix .asd loading.

Browse source 
* gnu/packages/lisp.scm (sbcl-trivia): Do it.
This commit is contained in:
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
Show stats Download patch file Download diff file Expand all files Collapse all files

19
gnu/packages/lisp.scm
View file

@ -6563,7 +6563,24 @@ (define-public sbcl-trivia
("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.")))