tests: Fix race condition in 'container-excursion*' test.
authorLudovic Courtès <ludo@gnu.org>
Wed, 31 May 2017 08:02:42 +0000 (10:02 +0200)
committerLudovic Courtès <ludo@gnu.org>
Wed, 31 May 2017 15:08:45 +0000 (17:08 +0200)
* tests/containers.scm ("container-excursion*"): Move (namespace pid)
call before (kill pid SIGKILL).

tests/containers.scm

index 0b3a4be..5323e50 100644 (file)
                                    %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"