nixo
/
guix-devel
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

syscalls: Be more permissive in 'umount' test. 

* tests/syscalls.scm ("umount, ENOENT"): Rename to...
  ("umount, ENOENT/EPERM"): ... this.  Accept EPERM as a valid return
  value.
This commit is contained in:
Ludovic Courtès 2014-05-27 22:36:54 +02:00
parent 5895f24443
commit 35066aa596
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
tests/syscalls.scm
View File

@ -33,13 +33,14 @@
#f) #f)
(compose system-error-errno list))) (compose system-error-errno list)))
(test-equal "umount, ENOENT" (test-assert "umount, ENOENT/EPERM"
ENOENT
(catch 'system-error (catch 'system-error
(lambda () (lambda ()
(umount "/does-not-exist") (umount "/does-not-exist")
#f) #f)
(compose system-error-errno list))) (lambda args
;; Both return values have been encountered in the wild.
(memv (system-error-errno args) (list EPERM ENOENT)))))
(test-end) (test-end)