diff options
author | Mathieu Othacehe <othacehe@gnu.org> | 2021-07-09 12:07:24 +0200 |
---|---|---|
committer | Mathieu Othacehe <othacehe@gnu.org> | 2021-07-09 14:12:40 +0200 |
commit | df49fe2a13d933c640e3189413c5adfced1103c5 (patch) | |
tree | d2ceefb621b79067ecebf7c969b8810957435842 | |
parent | 7bb9c3ebbb91b94fb8b1bcdf9f37e9c481a71d4d (diff) | |
download | guix-df49fe2a13d933c640e3189413c5adfced1103c5.tar.gz |
ci: Add bootstrap packages to the core subset.
* gnu/ci.scm (%bootstrap-packages): New variable. (cuirass-jobs): Add it to the core subset.
-rw-r--r-- | gnu/ci.scm | 11 |
1 files changed, 10 insertions, 1 deletions
diff --git a/gnu/ci.scm b/gnu/ci.scm index 428000472e..19ec5fbd7b 100644 --- a/gnu/ci.scm +++ b/gnu/ci.scm @@ -69,6 +69,7 @@ #:export (derivation->job image->job + %bootstrap-packages %core-packages %cross-targets channel-source->package @@ -148,6 +149,14 @@ SYSTEM." %guile-bootstrap-tarball %bootstrap-tarballs)) +(define %bootstrap-packages + ;; Return the list of bootstrap packages from the commencement module. + (filter package? + (module-map + (lambda (sym var) + (variable-ref var)) + (resolve-module '(gnu packages commencement))))) + (define (packages-to-cross-build target) "Return the list of packages to cross-build for TARGET." ;; Don't cross-build the bootstrap tarballs for MinGW. @@ -508,7 +517,7 @@ valid." (map (lambda (package) (package-job store (job-name package) package system)) - %core-packages) + (append %bootstrap-packages %core-packages)) (cross-jobs store system))) ('guix ;; Build Guix modules only. |