summaryrefslogtreecommitdiff
path: root/build-aux/check-available-binaries.scm
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2016-04-27 15:00:49 +0200
committerLudovic Courtès <ludo@gnu.org>2016-04-27 15:00:49 +0200
commitf1ebeee131d7b73c26689741fa48f55a5dd5b1de (patch)
tree028672e77f9914e8ae7e448287d200712e28898d /build-aux/check-available-binaries.scm
parent63e7796f626ee40b8259ce56b93f5596e8a1f8c5 (diff)
downloadgnu-guix-f1ebeee131d7b73c26689741fa48f55a5dd5b1de.tar
gnu-guix-f1ebeee131d7b73c26689741fa48f55a5dd5b1de.tar.gz
build: 'make assert-binaries-available' shows the list of systems.
* build-aux/check-available-binaries.scm: Display %HYDRA-SUPPORTED-SYSTEMS.
Diffstat (limited to 'build-aux/check-available-binaries.scm')
-rw-r--r--build-aux/check-available-binaries.scm5
1 files changed, 3 insertions, 2 deletions
diff --git a/build-aux/check-available-binaries.scm b/build-aux/check-available-binaries.scm
index e7db70bba9..0060a8669e 100644
--- a/build-aux/check-available-binaries.scm
+++ b/build-aux/check-available-binaries.scm
@@ -46,8 +46,9 @@
(available (substitutable-paths store total))
(missing (lset-difference string=? total available)))
(if (null? missing)
- (format (current-error-port) "~a packages found substitutable~%"
- (length total))
+ (format (current-error-port)
+ "~a packages found substitutable on~{ ~a~}~%"
+ (length total) %hydra-supported-systems)
(format (current-error-port)
"~a packages are not substitutable:~%~{ ~a~%~}~%"
(length missing) missing))