me/guix
Archived
1
0
Fork 0
Code Activity

build: Check the availability of i686-linux binaries.

Browse source 
* build-aux/check-available-binaries.scm (%supported-systems): New
  variable.
  (native): Map over these.
This commit is contained in:
Ludovic Courtès 2013-07-17 11:07:28 +02:00
parent 1959fb04dc
commit c71493c8b9
1 changed files with 7 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
build-aux/check-available-binaries.scm
View file

@ -28,9 +28,14 @@
(srfi srfi-1) (srfi srfi-1)
(srfi srfi-26)) (srfi srfi-26))
(define %supported-systems
'("x86_64-linux" "i686-linux"))
(let* ((store (open-connection)) (let* ((store (open-connection))
(native (map (cut package-derivation store <>) (native (append-map (lambda (system)
(list %bootstrap-tarballs emacs))) (map (cut package-derivation store <> system)
(list %bootstrap-tarballs emacs)))
%supported-systems))
(cross (map (cut package-cross-derivation store (cross (map (cut package-cross-derivation store
%bootstrap-tarballs <>) %bootstrap-tarballs <>)
'("mips64el-linux-gnuabi64"))) '("mips64el-linux-gnuabi64")))