gnu-system: Add hello subset.

* tests/gnu-system.scm (hydra-jobs): Add hello subset.
pull/3/head
Mathieu Lirzin 2016-06-12 14:40:56 +02:00
parent 6642651271
commit e5609c29c4
No known key found for this signature in database
GPG Key ID: 0ADEE10094604D37
1 changed files with 8 additions and 2 deletions

View File

@ -170,8 +170,9 @@ valid."
"Return Hydra jobs."
(define subset
(match (assoc-ref arguments 'subset)
("core" 'core) ; only build core packages
(_ 'all))) ; build everything
("core" 'core) ; only build core packages
("hello" 'hello) ; only build hello
(_ 'all))) ; build everything
(define (cross-jobs system)
(define (from-32-to-64? target)
@ -226,6 +227,11 @@ valid."
package system))
%core-packages)
(cross-jobs system)))
((hello)
;; Build hello package only.
(if (string=? system (%current-system))
(list (package-job-spec store (job-name hello) hello system))
'()))
(else
(error "unknown subset" subset))))
%hydra-supported-systems)))