From 2793c0fb263bcadebd59c793a4cdf2634fb77360 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= <ludo@gnu.org>
Date: Sun, 12 Oct 2014 00:13:20 +0200
Subject: 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.
---
 tests/syscalls.scm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'tests/syscalls.scm')

diff --git a/tests/syscalls.scm b/tests/syscalls.scm
index 51846d3c36..161e036e19 100644
--- a/tests/syscalls.scm
+++ b/tests/syscalls.scm
@@ -52,13 +52,13 @@
     (lambda args
       (memv (system-error-errno args) (list EPERM ENOENT)))))
 
-(test-assert "swapoff, EINVAL/EPERM"
+(test-assert "swapoff, ENOENT/EINVAL/EPERM"
   (catch 'system-error
     (lambda ()
       (swapoff "/does-not-exist")
       #f)
     (lambda args
-      (memv (system-error-errno args) (list EPERM EINVAL)))))
+      (memv (system-error-errno args) (list EPERM EINVAL ENOENT)))))
 
 (test-assert "all-network-interfaces"
   (match (all-network-interfaces)
-- 
cgit v1.2.3