build: 'make assert-binaries-available' shows the list of systems.

* build-aux/check-available-binaries.scm: Display %HYDRA-SUPPORTED-SYSTEMS.
This commit is contained in:
Ludovic Courtès 2016-04-27 15:00:49 +02:00
parent 63e7796f62
commit f1ebeee131
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5

View file

@ -46,8 +46,9 @@
(available (substitutable-paths store total)) (available (substitutable-paths store total))
(missing (lset-difference string=? total available))) (missing (lset-difference string=? total available)))
(if (null? missing) (if (null? missing)
(format (current-error-port) "~a packages found substitutable~%" (format (current-error-port)
(length total)) "~a packages found substitutable on~{ ~a~}~%"
(length total) %hydra-supported-systems)
(format (current-error-port) (format (current-error-port)
"~a packages are not substitutable:~%~{ ~a~%~}~%" "~a packages are not substitutable:~%~{ ~a~%~}~%"
(length missing) missing)) (length missing) missing))