aboutsummaryrefslogtreecommitdiff
path: root/build-aux/hydra/gnu-system.scm
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2014-03-25 18:57:07 +0100
committerLudovic Courtès <ludo@gnu.org>2014-03-25 18:57:07 +0100
commit1971737f2bf8980f5eb72b61f9bfeb788574eec9 (patch)
treeb23924be82d30ce123111f6d963416b0a2540c04 /build-aux/hydra/gnu-system.scm
parent9214f9bc0a573b475ccc846434a5954ea7838072 (diff)
downloadpatches-1971737f2bf8980f5eb72b61f9bfeb788574eec9.tar
patches-1971737f2bf8980f5eb72b61f9bfeb788574eec9.tar.gz
hydra: Hard-code target systems.
* build-aux/hydra/gnu-system.scm (hydra-jobs)[systems]: Define locally, independently of ARGUMENTS. This matches the new Hydra convention, where using a 'system' input is deprecated.
Diffstat (limited to 'build-aux/hydra/gnu-system.scm')
-rw-r--r--build-aux/hydra/gnu-system.scm11
1 files changed, 2 insertions, 9 deletions
diff --git a/build-aux/hydra/gnu-system.scm b/build-aux/hydra/gnu-system.scm
index 4651935831..083ff2a7cd 100644
--- a/build-aux/hydra/gnu-system.scm
+++ b/build-aux/hydra/gnu-system.scm
@@ -111,15 +111,8 @@ SYSTEM."
(define (hydra-jobs store arguments)
"Return Hydra jobs."
(define systems
- (match (filter-map (match-lambda
- (('system . value)
- value)
- (_ #f))
- arguments)
- ((lst ..1)
- lst)
- (_
- (list (%current-system)))))
+ ;; Systems we want to build for.
+ '("x86_64-linux" "i686-linux"))
(define subset
(match (assoc-ref arguments 'subset)