diff options
| author | Mathieu Othacehe <othacehe@gnu.org> | 2021-04-08 14:08:54 +0200 |
|---|---|---|
| committer | Mathieu Othacehe <othacehe@gnu.org> | 2021-04-08 15:24:03 +0200 |
| commit | 2afc79b51d0956e5834e81a70692a35cd83e4e87 (patch) | |
| tree | 7902be79f0b317c202e77dab3ca58518088919ea /gnu/ci.scm | |
| parent | 14ada96451812d1ccb7d42e3f0ec2a9248273f0e (diff) | |
ci: Introduce new subsets.
Introduce 'images, 'system-tests and 'tarball subsets.
* gnu/ci.scm (cuirass-jobs): Break the 'all subset into smaller subsets.
Diffstat (limited to 'gnu/ci.scm')
| -rw-r--r-- | gnu/ci.scm | 16 |
1 files changed, 11 insertions, 5 deletions
diff --git a/gnu/ci.scm b/gnu/ci.scm index 4095d4e5132..ff76ffde570 100644 --- a/gnu/ci.scm +++ b/gnu/ci.scm | |||
| @@ -483,11 +483,6 @@ valid." | |||
| 483 | (package->job store package system)))) | 483 | (package->job store package system)))) |
| 484 | (append | 484 | (append |
| 485 | (filter-map job all) | 485 | (filter-map job all) |
| 486 | (image-jobs store system) | ||
| 487 | (system-test-jobs store system | ||
| 488 | #:source source | ||
| 489 | #:commit commit) | ||
| 490 | (tarball-jobs store system) | ||
| 491 | (cross-jobs store system)))) | 486 | (cross-jobs store system)))) |
| 492 | ('core | 487 | ('core |
| 493 | ;; Build core packages only. | 488 | ;; Build core packages only. |
| @@ -507,6 +502,17 @@ valid." | |||
| 507 | (let ((hello (specification->package "hello"))) | 502 | (let ((hello (specification->package "hello"))) |
| 508 | (list (package-job store (job-name hello) | 503 | (list (package-job store (job-name hello) |
| 509 | hello system)))) | 504 | hello system)))) |
| 505 | ('images | ||
| 506 | ;; Build Guix System images only. | ||
| 507 | (image-jobs store system)) | ||
| 508 | ('system-tests | ||
| 509 | ;; Build Guix System tests only. | ||
| 510 | (system-test-jobs store system | ||
| 511 | #:source source | ||
| 512 | #:commit commit)) | ||
| 513 | ('tarball | ||
| 514 | ;; Build Guix tarball only. | ||
| 515 | (tarball-jobs store system)) | ||
| 510 | (('channels . channels) | 516 | (('channels . channels) |
| 511 | ;; Build only the packages from CHANNELS. | 517 | ;; Build only the packages from CHANNELS. |
| 512 | (let ((all (all-packages))) | 518 | (let ((all (all-packages))) |
