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

View file

@ -317,8 +317,15 @@ (define (same? target)
(define (pointless? target)
;; Return #t if it makes no sense to cross-build to TARGET from SYSTEM.
(and (string-contains target "mingw")
(not (string=? "x86_64-linux" system))))
(match 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)
(lambda (x)