diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2017-05-31 10:02:42 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2017-05-31 17:08:45 +0200 |
| commit | 3e894917414239cab1737d89feb263e0825ae7c5 (patch) | |
| tree | 494385ac835e2aa33714a1372da9626890fe3f06 /tests/containers.scm | |
| parent | bbc4167995d6ef5fe9ed0a43d0a2d6d8c18ea071 (diff) | |
tests: Fix race condition in 'container-excursion*' test.
* tests/containers.scm ("container-excursion*"): Move (namespace pid)
call before (kill pid SIGKILL).
Diffstat (limited to 'tests/containers.scm')
| -rw-r--r-- | tests/containers.scm | 3 |
1 files changed, 2 insertions, 1 deletions
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 @@ | |||
| 194 | %namespaces 1 | 194 | %namespaces 1 |
| 195 | (lambda () | 195 | (lambda () |
| 196 | (sleep 100)))) | 196 | (sleep 100)))) |
| 197 | (expected (namespaces pid)) | ||
| 197 | (result (container-excursion* pid | 198 | (result (container-excursion* pid |
| 198 | (lambda () | 199 | (lambda () |
| 199 | (namespaces 1))))) | 200 | (namespaces 1))))) |
| 200 | (kill pid SIGKILL) | 201 | (kill pid SIGKILL) |
| 201 | (equal? result (namespaces pid)))))) | 202 | (equal? result expected))))) |
| 202 | 203 | ||
| 203 | (skip-if-unsupported) | 204 | (skip-if-unsupported) |
| 204 | (test-equal "container-excursion*, same namespaces" | 205 | (test-equal "container-excursion*, same namespaces" |
