aboutsummaryrefslogtreecommitdiff
path: root/build-aux/check-available-binaries.scm
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2013-07-17 11:07:28 +0200
committerLudovic Courtès <ludo@gnu.org>2013-07-17 11:07:28 +0200
commitc71493c8b9328ff3dbddf3b9430200ef4d174917 (patch)
treefcb18224eb881bb3e6ede127230460671b901822 /build-aux/check-available-binaries.scm
parent1959fb04dc4608206bdcc6908ca3f0d71a43eda8 (diff)
downloadguix-c71493c8b9328ff3dbddf3b9430200ef4d174917.tar
guix-c71493c8b9328ff3dbddf3b9430200ef4d174917.tar.gz
build: Check the availability of i686-linux binaries.
* build-aux/check-available-binaries.scm (%supported-systems): New variable. (native): Map over these.
Diffstat (limited to 'build-aux/check-available-binaries.scm')
-rw-r--r--build-aux/check-available-binaries.scm9
1 files changed, 7 insertions, 2 deletions
diff --git a/build-aux/check-available-binaries.scm b/build-aux/check-available-binaries.scm
index 5599e5e7b6..8fd64fe2cb 100644
--- a/build-aux/check-available-binaries.scm
+++ b/build-aux/check-available-binaries.scm
@@ -28,9 +28,14 @@
(srfi srfi-1)
(srfi srfi-26))
+(define %supported-systems
+ '("x86_64-linux" "i686-linux"))
+
(let* ((store (open-connection))
- (native (map (cut package-derivation store <>)
- (list %bootstrap-tarballs emacs)))
+ (native (append-map (lambda (system)
+ (map (cut package-derivation store <> system)
+ (list %bootstrap-tarballs emacs)))
+ %supported-systems))
(cross (map (cut package-cross-derivation store
%bootstrap-tarballs <>)
'("mips64el-linux-gnuabi64")))