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:15 +0200 |
commit | 37861f6c293d7ed1033050b2b0597885ba65186f (patch) | |
tree | e40720c27eacf7a510e3e4cc6aedaaaabc1c0097 | |
parent | 74168d99bb50e8dd17af970d83eca771487be467 (diff) | |
download | guix-37861f6c293d7ed1033050b2b0597885ba65186f.tar guix-37861f6c293d7ed1033050b2b0597885ba65186f.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 c5de25e70e..ceb1b94af9 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. |