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

gnu: sbcl-triva: Remove ASD component fix.

Browse source 
* gnu/packages/lisp-xyz.scm (sbcl-triva)[arguments]: Remove 'remove-component
phase now that our build system supports component-less .asd files.
This commit is contained in:
Pierre Neidhardt 2020-06-18 16:48:37 +02:00
parent 6f51791022
commit 797f43af75
No known key found for this signature in database
GPG key ID: 9BDCF497A4BBCC7F
1 changed files with 1 additions and 18 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

19
gnu/packages/lisp-xyz.scm
View file

@ -6293,24 +6293,7 @@ (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.")))