summaryrefslogtreecommitdiff
path: root/tests/guix-gc.sh
diff options
context:
space:
mode:
authorEric Bavier <bavier@member.fsf.org>2020-09-25 11:00:11 -0500
committerEric Bavier <bavier@member.fsf.org>2020-09-28 21:06:36 -0500
commitd8934360d2453a403b5433e71d09188e4ed23b57 (patch)
tree8f65be24496c1cc375bc675ca20e7d126f8d2ed1 /tests/guix-gc.sh
parent9380b0a0752d7b922a664e6d96899047cb2f2811 (diff)
tests: Simplify shell exit status negation;
* tests/guix-archive.sh, tests/guix-build-branch.sh, tests/guix-build.sh, tests/guix-daemon.sh, tests/guix-download.sh, tests/guix-environment.sh, tests/guix-gc.sh, tests/guix-git-authenticate.sh, tests/guix-graph.sh, tests/guix-hash.sh, tests/guix-lint.sh, tests/guix-pack-relocatable.sh, tests/guix-pack.sh, tests/guix-package-aliases.sh, tests/guix-package-net.sh, tests/guix-package.sh: Use the shell '!' keyword to negate command exit status in place of 'if ...; then false; else true; fi'
Diffstat (limited to 'tests/guix-gc.sh')
-rw-r--r--tests/guix-gc.sh13
1 files changed, 5 insertions, 8 deletions
diff --git a/tests/guix-gc.sh b/tests/guix-gc.sh
index 8284287730f..f40619876d4 100644
--- a/tests/guix-gc.sh
+++ b/tests/guix-gc.sh
@@ -36,11 +36,11 @@ unset out
36# For some operations, passing extra arguments is an error. 36# For some operations, passing extra arguments is an error.
37for option in "" "-C 500M" "--verify" "--optimize" "--list-roots" 37for option in "" "-C 500M" "--verify" "--optimize" "--list-roots"
38do 38do
39 if guix gc $option whatever; then false; else true; fi 39 ! guix gc $option whatever
40done 40done
41 41
42# This should fail. 42# This should fail.
43if guix gc --verify=foo; then false; else true; fi 43! guix gc --verify=foo
44 44
45# Check the references of a .drv. 45# Check the references of a .drv.
46drv="`guix build guile-bootstrap -d`" 46drv="`guix build guile-bootstrap -d`"
@@ -51,8 +51,7 @@ guix gc --references "$drv" | grep -e -bash
51guix gc --references "$out" 51guix gc --references "$out"
52guix gc --references "$out/bin/guile" 52guix gc --references "$out/bin/guile"
53 53
54if guix gc --references /dev/null; 54! guix gc --references /dev/null;
55then false; else true; fi
56 55
57# Check derivers. 56# Check derivers.
58guix gc --derivers "$out" | grep "$drv" 57guix gc --derivers "$out" | grep "$drv"
@@ -72,8 +71,7 @@ test -f "$drv" && test -L guix-gc-root
72guix gc --list-roots | grep "$PWD/guix-gc-root" 71guix gc --list-roots | grep "$PWD/guix-gc-root"
73 72
74guix gc --list-live | grep "$drv" 73guix gc --list-live | grep "$drv"
75if guix gc --delete "$drv"; 74! guix gc --delete "$drv";
76then false; else true; fi
77 75
78rm guix-gc-root 76rm guix-gc-root
79guix gc --list-dead | grep "$drv" 77guix gc --list-dead | grep "$drv"
@@ -84,8 +82,7 @@ guix gc --delete "$drv"
84guix gc -C 1KiB 82guix gc -C 1KiB
85 83
86# Check trivial error cases. 84# Check trivial error cases.
87if guix gc --delete /dev/null; 85! guix gc --delete /dev/null;
88then false; else true; fi
89 86
90# Bug #19757 87# Bug #19757
91out="`guix build guile-bootstrap`" 88out="`guix build guile-bootstrap`"