summaryrefslogtreecommitdiff
path: root/tests/syscalls.scm
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2015-08-27 10:52:11 +0200
committerLudovic Courtès <ludo@gnu.org>2015-08-27 10:52:11 +0200
commit54e515eb75491f4d32219c223d4c753afb0d2c48 (patch)
tree034446a22d51375e32996b7d0dba482a418c1343 /tests/syscalls.scm
parentd1f38287f464dfe19f7463c4a390c6da38b0997d (diff)
downloadgnu-guix-54e515eb75491f4d32219c223d4c753afb0d2c48.tar
gnu-guix-54e515eb75491f4d32219c223d4c753afb0d2c48.tar.gz
tests: Skip 'set-network-interface-address' test when running as root.
Reported by Eric Hanchrow <eric.hanchrow@gmail.com> in <http://bugs.gnu.org/21354>. * tests/syscalls.scm ("set-network-interface-address"): Skip when (getuid) returns zero.
Diffstat (limited to 'tests/syscalls.scm')
-rw-r--r--tests/syscalls.scm1
1 files changed, 1 insertions, 0 deletions
diff --git a/tests/syscalls.scm b/tests/syscalls.scm
index 090e1e7858..86783b96c4 100644
--- a/tests/syscalls.scm
+++ b/tests/syscalls.scm
@@ -197,6 +197,7 @@
(close-port sock)
addr))
+(test-skip (if (zero? (getuid)) 1 0))
(test-assert "set-network-interface-address"
(let ((sock (socket AF_INET SOCK_STREAM 0)))
(catch 'system-error