mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-12-24 05:18:07 -05:00
tests: Fix race condition in 'container-excursion*' test.
* tests/containers.scm ("container-excursion*"): Move (namespace pid) call before (kill pid SIGKILL).
This commit is contained in:
parent
bbc4167995
commit
3e89491741
1 changed files with 2 additions and 1 deletions
|
@ -194,11 +194,12 @@ (define (namespaces pid)
|
||||||
%namespaces 1
|
%namespaces 1
|
||||||
(lambda ()
|
(lambda ()
|
||||||
(sleep 100))))
|
(sleep 100))))
|
||||||
|
(expected (namespaces pid))
|
||||||
(result (container-excursion* pid
|
(result (container-excursion* pid
|
||||||
(lambda ()
|
(lambda ()
|
||||||
(namespaces 1)))))
|
(namespaces 1)))))
|
||||||
(kill pid SIGKILL)
|
(kill pid SIGKILL)
|
||||||
(equal? result (namespaces pid))))))
|
(equal? result expected)))))
|
||||||
|
|
||||||
(skip-if-unsupported)
|
(skip-if-unsupported)
|
||||||
(test-equal "container-excursion*, same namespaces"
|
(test-equal "container-excursion*, same namespaces"
|
||||||
|
|
Loading…
Reference in a new issue