hydra: Fix wrong-num-args error when computing the cross jobs.

Fixes a regression introduced in
dea91108cf.

* build-aux/hydra/gnu-system.scm (hydra-jobs)[cross-jobs](either): Add
third parameter and honor it.
This commit is contained in:
Ludovic Courtès 2016-12-07 23:58:15 +01:00
parent 530b8bda1f
commit a69bc7071e
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5

View file

@ -283,9 +283,9 @@ (define (pointless? target)
(and (string-contains target "mingw") (and (string-contains target "mingw")
(not (string=? "x86_64-linux" system)))) (not (string=? "x86_64-linux" system))))
(define (either proc1 proc2) (define (either proc1 proc2 proc3)
(lambda (x) (lambda (x)
(or (proc1 x) (proc2 x)))) (or (proc1 x) (proc2 x) (proc3 x))))
(append-map (lambda (target) (append-map (lambda (target)
(map (lambda (package) (map (lambda (package)