diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2014-10-12 00:13:20 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2014-10-12 00:14:09 +0200 |
| commit | 2793c0fb263bcadebd59c793a4cdf2634fb77360 (patch) | |
| tree | a6fbf05e96f39ee076cb0e07be76f8d9a17fad1f | |
| parent | d53e8ba6b5656d973f764d29a7dc8f8bbf8708b6 (diff) | |
syscalls: Accept ENOENT in the 'swapoff' test.
Fixes <http://bugs.gnu.org/18690>.
Reported by Philip Woods <elzairthesorcerer@gmail.com>.
* tests/syscalls.scm ("swapoff, EINVAL/EPERM"): Rename to...
("swapoff, ENOENT/EINVAL/EPERM"): ... this. Add ENOENT to the list of
possible return values.
| -rw-r--r-- | tests/syscalls.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/syscalls.scm b/tests/syscalls.scm index 51846d3c36c..161e036e194 100644 --- a/tests/syscalls.scm +++ b/tests/syscalls.scm | |||
| @@ -52,13 +52,13 @@ | |||
| 52 | (lambda args | 52 | (lambda args |
| 53 | (memv (system-error-errno args) (list EPERM ENOENT))))) | 53 | (memv (system-error-errno args) (list EPERM ENOENT))))) |
| 54 | 54 | ||
| 55 | (test-assert "swapoff, EINVAL/EPERM" | 55 | (test-assert "swapoff, ENOENT/EINVAL/EPERM" |
| 56 | (catch 'system-error | 56 | (catch 'system-error |
| 57 | (lambda () | 57 | (lambda () |
| 58 | (swapoff "/does-not-exist") | 58 | (swapoff "/does-not-exist") |
| 59 | #f) | 59 | #f) |
| 60 | (lambda args | 60 | (lambda args |
| 61 | (memv (system-error-errno args) (list EPERM EINVAL))))) | 61 | (memv (system-error-errno args) (list EPERM EINVAL ENOENT))))) |
| 62 | 62 | ||
| 63 | (test-assert "all-network-interfaces" | 63 | (test-assert "all-network-interfaces" |
| 64 | (match (all-network-interfaces) | 64 | (match (all-network-interfaces) |