summary refs log tree commit diff
path: root/gnu/ci.scm
diff options
context:
space:
mode:
authorMathieu Othacehe <othacehe@gnu.org>2021-07-09 12:07:24 +0200
committerMathieu Othacehe <othacehe@gnu.org>2021-07-09 14:12:15 +0200
commit37861f6c293d7ed1033050b2b0597885ba65186f (patch)
treee40720c27eacf7a510e3e4cc6aedaaaabc1c0097 /gnu/ci.scm
parent74168d99bb50e8dd17af970d83eca771487be467 (diff)
downloadguix-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.
Diffstat (limited to 'gnu/ci.scm')
-rw-r--r--gnu/ci.scm11
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.