File: 0024-tests-derivations.scm-Disable-tests-that-need-bootst.patch

package info (click to toggle)
guix 1.4.0-9
  • links: PTS, VCS
  • area: main
  • in suites: sid
  • size: 161,500 kB
  • sloc: lisp: 861,023; cpp: 10,741; javascript: 9,632; sh: 8,913; makefile: 951; ansic: 558; python: 129; sql: 33; sed: 16
file content (33 lines) | stat: -rw-r--r-- 1,236 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
From a55247c85a015fd03f94e20e13c427f85a9283c6 Mon Sep 17 00:00:00 2001
From: Vagrant Cascadian <vagrant@debian.org>
Date: Tue, 10 Nov 2020 20:40:06 -0800
Subject: [PATCH 24/29] tests/derivations.scm: Disable tests that need
 bootstrap binaries.

---
 tests/derivations.scm | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/tests/derivations.scm b/tests/derivations.scm
index 58de18dfae..76dbb90798 100644
--- a/tests/derivations.scm
+++ b/tests/derivations.scm
@@ -767,6 +767,7 @@
            (string=? path (derivation-file-name (%guile-for-build)))))
          (derivation-prerequisites drv))))
 
+(unless (network-reachable?) (test-skip 1))
 (test-assert "derivation-prerequisites and valid-derivation-input?"
   (let* ((a (build-expression->derivation %store "a" '(mkdir %output)))
          (b (build-expression->derivation %store "b" `(list ,(random-text))))
@@ -938,6 +939,7 @@
                (((= derivation-file-name build))
                 (string=? build (derivation-file-name drv)))))))))
 
+(unless (network-reachable?) (test-skip 1))
 (test-assert "derivation-build-plan and substitutes, non-substitutable dep"
   (with-store store
     (let* ((drv1 (build-expression->derivation store "prereq-no-subst"
-- 
2.30.2