gnu: Add some missing ECL packages.
* gnu/packages/lisp-xyz.scm (sbcl-antik-base)[arguments]: Remove physical-dimensions and science-data from 'asd-systems'. Update 'fix-build' phase accordingly. (ecl-antik-base, ecl-gsll): New variables. (sbcl-antik)[arguments]: Add 'asd-systems'. Update 'fix-build' phase accordingly.master
parent
4287ee6970
commit
e1dda5ddfd
|
@ -6814,14 +6814,15 @@ your own classes.")
|
||||||
`(("lisp-unit" ,sbcl-lisp-unit)))
|
`(("lisp-unit" ,sbcl-lisp-unit)))
|
||||||
(arguments
|
(arguments
|
||||||
'(#:asd-systems '("antik-base"
|
'(#:asd-systems '("antik-base"
|
||||||
"foreign-array"
|
"foreign-array")
|
||||||
"physical-dimension"
|
|
||||||
"science-data")
|
|
||||||
#:phases
|
#:phases
|
||||||
(modify-phases %standard-phases
|
(modify-phases %standard-phases
|
||||||
(add-after 'unpack 'fix-build
|
(add-after 'unpack 'fix-build
|
||||||
(lambda _
|
(lambda _
|
||||||
(delete-file "antik.asd")
|
(for-each delete-file
|
||||||
|
'("antik.asd"
|
||||||
|
"physical-dimension.asd"
|
||||||
|
"science-data.asd"))
|
||||||
#t)))))
|
#t)))))
|
||||||
(synopsis "Scientific and engineering computation in Common Lisp")
|
(synopsis "Scientific and engineering computation in Common Lisp")
|
||||||
(description
|
(description
|
||||||
|
@ -6838,6 +6839,21 @@ computer known.")
|
||||||
(define-public cl-antik-base
|
(define-public cl-antik-base
|
||||||
(sbcl-package->cl-source-package sbcl-antik-base))
|
(sbcl-package->cl-source-package sbcl-antik-base))
|
||||||
|
|
||||||
|
(define-public ecl-antik-base
|
||||||
|
(let ((pkg (sbcl-package->ecl-package sbcl-antik-base)))
|
||||||
|
(package
|
||||||
|
(inherit pkg)
|
||||||
|
(arguments
|
||||||
|
(substitute-keyword-arguments (package-arguments pkg)
|
||||||
|
((#:phases phases)
|
||||||
|
`(modify-phases ,phases
|
||||||
|
(add-after 'unpack 'fix-readtable
|
||||||
|
(lambda _
|
||||||
|
(substitute* "input-output/readtable.lisp"
|
||||||
|
(("#-ccl")
|
||||||
|
"#-(or ccl ecl)"))
|
||||||
|
#t)))))))))
|
||||||
|
|
||||||
(define-public sbcl-gsll
|
(define-public sbcl-gsll
|
||||||
(let ((commit "1a8ada22f9cf5ed7372d352b2317f4ccdb6ab308")
|
(let ((commit "1a8ada22f9cf5ed7372d352b2317f4ccdb6ab308")
|
||||||
(revision "1"))
|
(revision "1"))
|
||||||
|
@ -6899,6 +6915,9 @@ intending to program in Lisp.")
|
||||||
(define-public cl-gsll
|
(define-public cl-gsll
|
||||||
(sbcl-package->cl-source-package sbcl-gsll))
|
(sbcl-package->cl-source-package sbcl-gsll))
|
||||||
|
|
||||||
|
(define-public ecl-gsll
|
||||||
|
(sbcl-package->ecl-package sbcl-gsll))
|
||||||
|
|
||||||
(define-public sbcl-antik
|
(define-public sbcl-antik
|
||||||
(package
|
(package
|
||||||
(inherit sbcl-antik-base)
|
(inherit sbcl-antik-base)
|
||||||
|
@ -6907,15 +6926,15 @@ intending to program in Lisp.")
|
||||||
`(("antik-base" ,sbcl-antik-base)
|
`(("antik-base" ,sbcl-antik-base)
|
||||||
("gsll" ,sbcl-gsll)))
|
("gsll" ,sbcl-gsll)))
|
||||||
(arguments
|
(arguments
|
||||||
'(#:phases
|
'(#:asd-systems '("antik"
|
||||||
|
"science-data")
|
||||||
|
#:phases
|
||||||
(modify-phases %standard-phases
|
(modify-phases %standard-phases
|
||||||
(add-after 'unpack 'fix-build
|
(add-after 'unpack 'fix-build
|
||||||
(lambda _
|
(lambda _
|
||||||
(for-each delete-file
|
(for-each delete-file
|
||||||
'("antik-base.asd"
|
'("antik-base.asd"
|
||||||
"foreign-array.asd"
|
"foreign-array.asd"))
|
||||||
"physical-dimension.asd"
|
|
||||||
"science-data.asd"))
|
|
||||||
#t)))))))
|
#t)))))))
|
||||||
|
|
||||||
(define-public cl-antik
|
(define-public cl-antik
|
||||||
|
|
Reference in New Issue