summary refs log tree commit diff
path: root/tests
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2012-11-13 00:40:29 +0100
committerLudovic Courtès <ludo@gnu.org>2012-11-13 00:40:29 +0100
commit92b8d1ea8b2dab6df9d76b2bf8d78e33fec197f1 (patch)
treea933037acadee1df76e203bc82b77073db597783 /tests
parent1dfb715df0e3ab79e799bb13fd4a349f72e992ec (diff)
downloadguix-92b8d1ea8b2dab6df9d76b2bf8d78e33fec197f1.tar.gz
tests: Make sure to use the bootstrap Guile.
* tests/builders.scm ("url-fetch", "gnu-build"): Pass `url-fetch'
  #:guile %BOOTSTRAP-GUILE.
Diffstat (limited to 'tests')
-rw-r--r--tests/builders.scm6
1 files changed, 4 insertions, 2 deletions
diff --git a/tests/builders.scm b/tests/builders.scm
index d2691c521f..12841d5690 100644
--- a/tests/builders.scm
+++ b/tests/builders.scm
@@ -58,7 +58,8 @@
                      "ftp://ftp.gnu.org/gnu/hello/hello-2.8.tar.gz"))
          (hash     (nix-base32-string->bytevector
                     "0wqd8sjmxfskrflaxywc7gqw7sfawrfvdxd9skxawzfgyy0pzdz6"))
-         (drv-path (url-fetch %store url 'sha256 hash))
+         (drv-path (url-fetch %store url 'sha256 hash
+                              #:guile %bootstrap-guile))
          (out-path (derivation-path->output-path drv-path)))
     (and (build-derivations %store (list drv-path))
          (file-exists? out-path)
@@ -72,7 +73,8 @@
   (let* ((url      "http://ftp.gnu.org/gnu/hello/hello-2.8.tar.gz")
          (hash     (nix-base32-string->bytevector
                     "0wqd8sjmxfskrflaxywc7gqw7sfawrfvdxd9skxawzfgyy0pzdz6"))
-         (tarball  (url-fetch %store url 'sha256 hash))
+         (tarball  (url-fetch %store url 'sha256 hash
+                              #:guile %bootstrap-guile))
          (build    (gnu-build %store "hello-2.8" tarball
                               %bootstrap-inputs
                               #:implicit-inputs? #f