diff options
author | Ludovic Courtès <ludo@gnu.org> | 2017-03-09 16:35:41 +0100 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2017-03-09 16:35:41 +0100 |
commit | e90e0fad1b3ba79d81f02424e143ee6f4f736e8b (patch) | |
tree | 2c26190fd9114199b0ef79303e18a61100cab4af /build-aux/hydra | |
parent | 8ea0700d231a8819fc7e8332e9685f0ce15c174e (diff) | |
parent | 9ec2a4d3fec44f08a55df9f5f3d1a04b83e7fcf6 (diff) |
Merge branch 'master' into core-updates
Diffstat (limited to 'build-aux/hydra')
-rw-r--r-- | build-aux/hydra/gnu-system.scm | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/build-aux/hydra/gnu-system.scm b/build-aux/hydra/gnu-system.scm index 53fa637f14..a4893f198c 100644 --- a/build-aux/hydra/gnu-system.scm +++ b/build-aux/hydra/gnu-system.scm @@ -259,14 +259,17 @@ valid." ;; prevents known-to-fail cross-builds from i686-linux or armhf-linux to ;; mips64el-linux-gnuabi64. (and (or (string-prefix? "i686-" system) + (string-prefix? "i586-" system) (string-prefix? "armhf-" system)) - (string-suffix? "64" target))) + (string-contains target "64"))) ;x86_64, mips64el, aarch64, etc. (define (same? target) ;; Return true if SYSTEM and TARGET are the same thing. This is so we ;; don't try to cross-compile to 'mips64el-linux-gnu' from ;; 'mips64el-linux'. - (string-contains target system)) + (or (string-contains target system) + (and (string-prefix? "armhf" system) ;armhf-linux + (string-prefix? "arm" target)))) ;arm-linux-gnueabihf (define (pointless? target) ;; Return #t if it makes no sense to cross-build to TARGET from SYSTEM. |