me/guix
Archived
1
0
Fork 0
Code Activity

gnu: ccl: Use system ASDF instead of bundled one.

Browse source 
* gnu/packages/lisp.scm (ccl)[native-inputs]: Add cl-asdf.
  [arguments]: Add 'replace-asdf' phase.
  [native-search-paths]: Add XDG_CONFIG_DIRS and XDG_DATA_DIRS.
This commit is contained in:
Guillaume Le Vaillant 2020-12-04 10:29:34 +01:00
parent 031fbebafe
commit 623a98a9dc
No known key found for this signature in database
GPG key ID: 6BE8208ADF21FE3F
1 changed files with 19 additions and 1 deletions

20
gnu/packages/lisp.scm
View file

@ -603,7 +603,8 @@ statistical profiler, a code coverage tool, and many other extensions.")
"0x4bjx6cxsjvxyagijhlvmc7jkyxifdvz5q5zvz37028va65243c") "0x4bjx6cxsjvxyagijhlvmc7jkyxifdvz5q5zvz37028va65243c")
(_ "15l7cfa4a7jkfwdzsfm4q3n22jnb57imxahpql3h77xin57v1gbz")))))))) (_ "15l7cfa4a7jkfwdzsfm4q3n22jnb57imxahpql3h77xin57v1gbz"))))))))
(native-inputs (native-inputs
`(("m4" ,m4))) `(("cl-asdf" ,cl-asdf)
("m4" ,m4)))
(arguments (arguments
`(#:tests? #f ;no 'check' target `(#:tests? #f ;no 'check' target
#:modules ((ice-9 match) #:modules ((ice-9 match)
@ -615,6 +616,16 @@ statistical profiler, a code coverage tool, and many other extensions.")
(add-after 'unpack 'unpack-image (add-after 'unpack 'unpack-image
(lambda* (#:key inputs #:allow-other-keys) (lambda* (#:key inputs #:allow-other-keys)
(invoke "tar" "xzvf" (assoc-ref inputs "ccl-bootstrap")))) (invoke "tar" "xzvf" (assoc-ref inputs "ccl-bootstrap"))))
(add-after 'unpack 'replace-asdf
;; Use system ASDF instead of bundled one.
(lambda* (#:key inputs #:allow-other-keys)
(let* ((cl-asdf (assoc-ref inputs "cl-asdf"))
(guix-asdf (string-append
cl-asdf
"/share/common-lisp/source/asdf/asdf.lisp"))
(contrib-asdf "tools/asdf.lisp"))
(delete-file contrib-asdf)
(copy-file guix-asdf contrib-asdf))))
(delete 'configure) (delete 'configure)
(add-before 'build 'pre-build (add-before 'build 'pre-build
;; Enter the source directory for the current platform's lisp ;; Enter the source directory for the current platform's lisp
@ -678,6 +689,13 @@ statistical profiler, a code coverage tool, and many other extensions.")
"exec -a \"$0\" " libdir kernel " \"$@\"\n")))) "exec -a \"$0\" " libdir kernel " \"$@\"\n"))))
(chmod wrapper #o755)) (chmod wrapper #o755))
#t))))) #t)))))
(native-search-paths
(list (search-path-specification
(variable "XDG_DATA_DIRS")
(files '("share")))
(search-path-specification
(variable "XDG_CONFIG_DIRS")
(files '("etc")))))
(supported-systems '("i686-linux" "x86_64-linux" "armhf-linux")) (supported-systems '("i686-linux" "x86_64-linux" "armhf-linux"))
(home-page "https://ccl.clozure.com/") (home-page "https://ccl.clozure.com/")
(synopsis "Common Lisp implementation") (synopsis "Common Lisp implementation")