diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2016-03-06 21:53:28 +0100 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2016-03-06 23:16:35 +0100 |
| commit | ef8de9852eeb9f9ce8e01a2a4f60a057b890b94a (patch) | |
| tree | 5b66a5003072f0b8cf345a6aec016e3c792cba1f /tests/profiles.scm | |
| parent | 322bb53c7aca0855833d07a7ea55ae243235f285 (diff) | |
| download | patches-ef8de9852eeb9f9ce8e01a2a4f60a057b890b94a.tar patches-ef8de9852eeb9f9ce8e01a2a4f60a057b890b94a.tar.gz | |
tests: Disable grafting by default for most tests.
This allows tests to run as expected even in the presence of
replacements among the bootstrap packages, such as Perl (commit
d8173f21f7b4e3cb83541b8fa70621d2b6d4ce1c).
* tests/cpan.scm: Add (%graft? #f).
* tests/derivations.scm: Likewise.
* tests/graph.scm: Likewise.
* tests/monads.scm: Likewise.
* tests/profiles.scm: Likewise.
* tests/gexp.scm: Likewise.
("gexp->derivation vs. grafts"): Explicitly reenable grafting before,
and disable it after, using 'set-grafting'.
Diffstat (limited to 'tests/profiles.scm')
| -rw-r--r-- | tests/profiles.scm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/tests/profiles.scm b/tests/profiles.scm index e659c2e26d..6714dfcaa7 100644 --- a/tests/profiles.scm +++ b/tests/profiles.scm @@ -1,5 +1,5 @@ ;;; GNU Guix --- Functional package management for GNU -;;; Copyright © 2013, 2014, 2015 Ludovic Courtès <ludo@gnu.org> +;;; Copyright © 2013, 2014, 2015, 2016 Ludovic Courtès <ludo@gnu.org> ;;; Copyright © 2014 Alex Kost <alezost@gmail.com> ;;; ;;; This file is part of GNU Guix. @@ -22,6 +22,7 @@ #:use-module (guix profiles) #:use-module (guix store) #:use-module (guix monads) + #:use-module (guix grafts) #:use-module (guix packages) #:use-module (guix derivations) #:use-module (guix build-system trivial) @@ -41,6 +42,9 @@ (define %store (open-connection-for-tests)) +;; Globally disable grafts because they can trigger early builds. +(%graft? #f) + (define-syntax-rule (test-assertm name exp) (test-assert name (run-with-store %store exp |