From 3e894917414239cab1737d89feb263e0825ae7c5 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= <ludo@gnu.org>
Date: Wed, 31 May 2017 10:02:42 +0200
Subject: [PATCH] tests: Fix race condition in 'container-excursion*' test.
* tests/containers.scm ("container-excursion*"): Move (namespace pid)
call before (kill pid SIGKILL).
---
tests/containers.scm | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/tests/containers.scm b/tests/containers.scm
index 0b3a4be12b9..5323e5037dc 100644
--- a/tests/containers.scm
+++ b/tests/containers.scm
@@ -194,11 +194,12 @@ (define (namespaces pid)
%namespaces 1
(lambda ()
(sleep 100))))
+ (expected (namespaces pid))
(result (container-excursion* pid
(lambda ()
(namespaces 1)))))
(kill pid SIGKILL)
- (equal? result (namespaces pid))))))
+ (equal? result expected)))))
(skip-if-unsupported)
(test-equal "container-excursion*, same namespaces"
--
GitLab