amaharaneko/guix-mirrors
1
1
Fork 0
mirror of https://codeberg.org/guix/guix.git synced 2025-10-02 02:15:12 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: chez-scheme: Make bootfiles regular inputs.

Browse source 
* gnu/packages/chez.scm (chez-scheme)[native-inputs]: Move
'chez-scheme-bootstrap-bootfiles' to ...
[inputs]: ... this field.
[arguments]<#:phases>: Update 'unpack-bootfiles' accordingly.
(chez-scheme-for-racket)[native-inputs]: Move
'chez-scheme-for-racket-bootstrap-bootfiles' to ...
[inputs]: ... this field.

Signed-off-by: Ludovic Courtès <ludo@gnu.org>
This commit is contained in:
Philip McGrath 2022-08-27 14:55:49 -04:00 • committed by Ludovic Courtès
parent 9647296ce6
commit 47da722838
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
1 changed files with 7 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

14
gnu/packages/chez.scm
View file

@ -293,6 +293,7 @@ Otherwise, SYSTEM can use only the ``portable bytecode'' backends."
(build-system gnu-build-system) (build-system gnu-build-system)
(inputs (inputs
(list (list
chez-scheme-bootstrap-bootfiles
`(,util-linux "lib") ;<-- libuuid `(,util-linux "lib") ;<-- libuuid
zlib zlib
lz4 lz4
@ -300,8 +301,7 @@ Otherwise, SYSTEM can use only the ``portable bytecode'' backends."
;; for X11 clipboard support in expeditor: ;; for X11 clipboard support in expeditor:
;; https://github.com/cisco/ChezScheme/issues/9#issuecomment-222057232 ;; https://github.com/cisco/ChezScheme/issues/9#issuecomment-222057232
libx11)) libx11))
(native-inputs (list chez-scheme-bootstrap-bootfiles (native-inputs (list chez-nanopass-bootstrap
chez-nanopass-bootstrap
stex-bootstrap)) stex-bootstrap))
(native-search-paths (native-search-paths
(list (search-path-specification (list (search-path-specification
@ -338,7 +338,7 @@ Otherwise, SYSTEM can use only the ``portable bytecode'' backends."
(when (directory-exists? "boot") (when (directory-exists? "boot")
(delete-file-recursively "boot")) (delete-file-recursively "boot"))
(copy-recursively (copy-recursively
(search-input-directory (or native-inputs inputs) (search-input-directory inputs
"lib/chez-scheme-bootfiles") "lib/chez-scheme-bootfiles")
"boot"))) "boot")))
;; NOTE: The custom Chez 'configure' script doesn't allow ;; NOTE: The custom Chez 'configure' script doesn't allow
@ -449,12 +449,12 @@ and 32-bit PowerPC architectures.")
(source #f) ; avoid problematic cycle with racket.scm (source #f) ; avoid problematic cycle with racket.scm
(inputs (inputs
(modify-inputs (package-inputs chez-scheme) (modify-inputs (package-inputs chez-scheme)
(delete "libx11" "util-linux:lib"))) (delete "libx11" "util-linux:lib")
(replace "chez-scheme-bootstrap-bootfiles"
chez-scheme-for-racket-bootstrap-bootfiles)))
(native-inputs (native-inputs
(modify-inputs (package-native-inputs chez-scheme) (modify-inputs (package-native-inputs chez-scheme)
(prepend zuo) (prepend zuo)))
(replace "chez-scheme-bootstrap-bootfiles"
chez-scheme-for-racket-bootstrap-bootfiles)))
(arguments (arguments
(substitute-keyword-arguments (package-arguments chez-scheme) (substitute-keyword-arguments (package-arguments chez-scheme)
((#:out-of-source? _ #f) ((#:out-of-source? _ #f)