diff options
| author | Eric Bavier <bavier@member.fsf.org> | 2020-09-25 11:00:11 -0500 |
|---|---|---|
| committer | Eric Bavier <bavier@member.fsf.org> | 2020-09-28 21:06:36 -0500 |
| commit | d8934360d2453a403b5433e71d09188e4ed23b57 (patch) | |
| tree | 8f65be24496c1cc375bc675ca20e7d126f8d2ed1 /tests/guix-gc.sh | |
| parent | 9380b0a0752d7b922a664e6d96899047cb2f2811 (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.sh | 13 |
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. |
| 37 | for option in "" "-C 500M" "--verify" "--optimize" "--list-roots" | 37 | for option in "" "-C 500M" "--verify" "--optimize" "--list-roots" |
| 38 | do | 38 | do |
| 39 | if guix gc $option whatever; then false; else true; fi | 39 | ! guix gc $option whatever |
| 40 | done | 40 | done |
| 41 | 41 | ||
| 42 | # This should fail. | 42 | # This should fail. |
| 43 | if 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. |
| 46 | drv="`guix build guile-bootstrap -d`" | 46 | drv="`guix build guile-bootstrap -d`" |
| @@ -51,8 +51,7 @@ guix gc --references "$drv" | grep -e -bash | |||
| 51 | guix gc --references "$out" | 51 | guix gc --references "$out" |
| 52 | guix gc --references "$out/bin/guile" | 52 | guix gc --references "$out/bin/guile" |
| 53 | 53 | ||
| 54 | if guix gc --references /dev/null; | 54 | ! guix gc --references /dev/null; |
| 55 | then false; else true; fi | ||
| 56 | 55 | ||
| 57 | # Check derivers. | 56 | # Check derivers. |
| 58 | guix gc --derivers "$out" | grep "$drv" | 57 | guix gc --derivers "$out" | grep "$drv" |
| @@ -72,8 +71,7 @@ test -f "$drv" && test -L guix-gc-root | |||
| 72 | guix gc --list-roots | grep "$PWD/guix-gc-root" | 71 | guix gc --list-roots | grep "$PWD/guix-gc-root" |
| 73 | 72 | ||
| 74 | guix gc --list-live | grep "$drv" | 73 | guix gc --list-live | grep "$drv" |
| 75 | if guix gc --delete "$drv"; | 74 | ! guix gc --delete "$drv"; |
| 76 | then false; else true; fi | ||
| 77 | 75 | ||
| 78 | rm guix-gc-root | 76 | rm guix-gc-root |
| 79 | guix gc --list-dead | grep "$drv" | 77 | guix gc --list-dead | grep "$drv" |
| @@ -84,8 +82,7 @@ guix gc --delete "$drv" | |||
| 84 | guix gc -C 1KiB | 82 | guix gc -C 1KiB |
| 85 | 83 | ||
| 86 | # Check trivial error cases. | 84 | # Check trivial error cases. |
| 87 | if guix gc --delete /dev/null; | 85 | ! guix gc --delete /dev/null; |
| 88 | then false; else true; fi | ||
| 89 | 86 | ||
| 90 | # Bug #19757 | 87 | # Bug #19757 |
| 91 | out="`guix build guile-bootstrap`" | 88 | out="`guix build guile-bootstrap`" |
