File: 0001-tests-challenge-Disable-tests-requiring-bootstrap-bi.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 (31 lines) | stat: -rw-r--r-- 926 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
From bf42078587bd6bd70ca5ee976f1031ce22cd0138 Mon Sep 17 00:00:00 2001
From: Vagrant Cascadian <vagrant@debian.org>
Date: Fri, 6 Nov 2020 18:08:06 -0800
Subject: [PATCH 01/29] tests/challenge: Disable tests requiring bootstrap
 binaries if network is unavailable.

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

diff --git a/tests/challenge.scm b/tests/challenge.scm
index fdd5fd238e..70d92be097 100644
--- a/tests/challenge.scm
+++ b/tests/challenge.scm
@@ -210,11 +210,13 @@ value."
                   (pk 'report reports)
                   (return (proc (car reports))))))))))))
 
+(unless (network-reachable?) (test-skip 1))
 (test-assertm "differing-files"
   (call-mismatch-test
    (lambda (report)
      (equal? (differing-files report) '("/bin/guile")))))
 
+(unless (network-reachable?) (test-skip 1))
 (test-assertm "call-with-mismatches"
   (call-mismatch-test
    (lambda (report)
-- 
2.30.2