diff options
author | Ludovic Courtès <ludo@gnu.org> | 2015-02-23 23:52:28 +0100 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2015-02-24 00:01:34 +0100 |
commit | b69c5c2ced1e41fdb5c2e747b1fb3a338ca63768 (patch) | |
tree | eafabb8dcb62eb56ea00e2a46f7fb42109c9f69d /tests/packages.scm | |
parent | 12d720fd1a9c43019f2d5afa051b45c7633b3ab0 (diff) | |
download | guix-b69c5c2ced1e41fdb5c2e747b1fb3a338ca63768.tar.gz |
tests: Skip tests that would fail due to the shebang length.
Reported by Daniel Kochmański <dkochmanski@hellsgate.pl>. Fixes <http://bugs.gnu.org/19888>. * guix/tests.scm (shebang-too-long?): New procedure. * tests/builders.scm ("gnu-build"): Conditionalize on not (shebang-too-long?). * tests/packages.scm ("GNU Make, bootstrap"): Likewise. * tests/guix-package.sh (shebang_not_too_long): New function. Use it to determine whether to build 'gnu-make-boot0'.
Diffstat (limited to 'tests/packages.scm')
-rw-r--r-- | tests/packages.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/tests/packages.scm b/tests/packages.scm index 5725b0a8a9..d6371b3b49 100644 --- a/tests/packages.scm +++ b/tests/packages.scm @@ -531,7 +531,8 @@ (%current-target-system "foo64-linux-gnu")) (equal? drv (bag->derivation %store bag)))))) -(unless (network-reachable?) (test-skip 1)) +(when (or (not (network-reachable?)) (shebang-too-long?)) + (test-skip 1)) (test-assert "GNU Make, bootstrap" ;; GNU Make is the first program built during bootstrap; we choose it ;; here so that the test doesn't last for too long. |