hydra: Do not cross-build from non-Intel platforms.

* build-aux/hydra/gnu-system.scm (hydra-jobs)[cross-jobs](pointless?):
Return #t on non-Intel.
This commit is contained in:
Ludovic Courtès 2017-12-29 13:38:06 +01:00
parent f3c294a2ab
commit 8781c3d9fc
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5
1 changed files with 9 additions and 2 deletions

View File

@ -317,8 +317,15 @@ valid."
(define (pointless? target) (define (pointless? target)
;; Return #t if it makes no sense to cross-build to TARGET from SYSTEM. ;; Return #t if it makes no sense to cross-build to TARGET from SYSTEM.
(and (string-contains target "mingw") (match system
(not (string=? "x86_64-linux" system)))) ((or "x86_64-linux" "i686-linux")
(if (string-contains target "mingw")
(not (string=? "x86_64-linux" system))
#f))
(_
;; Don't try to cross-compile from non-Intel platforms: this isn't
;; very useful and these are often brittle configurations.
#t)))
(define (either proc1 proc2 proc3) (define (either proc1 proc2 proc3)
(lambda (x) (lambda (x)