summaryrefslogtreecommitdiff
path: root/gnu/packages
diff options
context:
space:
mode:
authorGuillaume Le Vaillant <glv@posteo.net>2020-09-16 20:15:43 +0200
committerGuillaume Le Vaillant <glv@posteo.net>2020-09-16 20:15:43 +0200
commite1dda5ddfd1f6cfc0af59b49f8db384c07189b45 (patch)
tree73aaf0ecbcf832907d7e9e1cd597f51f7741fcb5 /gnu/packages
parent4287ee6970a26f7706ab65bb0642accbced0148d (diff)
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.
Diffstat (limited to 'gnu/packages')
-rw-r--r--gnu/packages/lisp-xyz.scm35
1 files changed, 27 insertions, 8 deletions
diff --git a/gnu/packages/lisp-xyz.scm b/gnu/packages/lisp-xyz.scm
index 9662a36a85..cd04f8db96 100644
--- a/gnu/packages/lisp-xyz.scm
+++ b/gnu/packages/lisp-xyz.scm
@@ -6814,14 +6814,15 @@ your own classes.")
`(("lisp-unit" ,sbcl-lisp-unit)))
(arguments
'(#:asd-systems '("antik-base"
- "foreign-array"
- "physical-dimension"
- "science-data")
+ "foreign-array")
#:phases
(modify-phases %standard-phases
(add-after 'unpack 'fix-build
(lambda _
- (delete-file "antik.asd")
+ (for-each delete-file
+ '("antik.asd"
+ "physical-dimension.asd"
+ "science-data.asd"))
#t)))))
(synopsis "Scientific and engineering computation in Common Lisp")
(description
@@ -6838,6 +6839,21 @@ computer known.")
(define-public cl-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
(let ((commit "1a8ada22f9cf5ed7372d352b2317f4ccdb6ab308")
(revision "1"))
@@ -6899,6 +6915,9 @@ intending to program in Lisp.")
(define-public cl-gsll
(sbcl-package->cl-source-package sbcl-gsll))
+(define-public ecl-gsll
+ (sbcl-package->ecl-package sbcl-gsll))
+
(define-public sbcl-antik
(package
(inherit sbcl-antik-base)
@@ -6907,15 +6926,15 @@ intending to program in Lisp.")
`(("antik-base" ,sbcl-antik-base)
("gsll" ,sbcl-gsll)))
(arguments
- '(#:phases
+ '(#:asd-systems '("antik"
+ "science-data")
+ #:phases
(modify-phases %standard-phases
(add-after 'unpack 'fix-build
(lambda _
(for-each delete-file
'("antik-base.asd"
- "foreign-array.asd"
- "physical-dimension.asd"
- "science-data.asd"))
+ "foreign-array.asd"))
#t)))))))
(define-public cl-antik