~ruther/guix-local

5cfc17cb7f813cacba0fc583d5b7d13cfa51063e — Mark H Weaver 11 years ago 76eb726
tests: Select appropriate bootstrap guile version for current system.

* tests/packages.scm ("package-source-derivation, snippet"): Select appropriate
  guile-2.0.x.tar.xz tarball based on the value of (%current-system).
1 files changed, 5 insertions(+), 1 deletions(-)

M tests/packages.scm
M tests/packages.scm => tests/packages.scm +5 -1
@@ 210,7 210,11 @@
(unless (network-reachable?) (test-skip 1))
(test-equal "package-source-derivation, snippet"
  "OK"
  (let* ((file   (search-bootstrap-binary "guile-2.0.9.tar.xz"
  (let* ((file   (search-bootstrap-binary (match (%current-system)
                                            ("armhf-linux"
                                             "guile-2.0.11.tar.xz")
                                            (_
                                             "guile-2.0.9.tar.xz"))
                                          (%current-system)))
         (sha256 (call-with-input-file file port-sha256))
         (fetch  (lambda* (url hash-algo hash