summaryrefslogtreecommitdiff
path: root/tests/containers.scm
diff options
context:
space:
mode:
Diffstat (limited to 'tests/containers.scm')
-rw-r--r--tests/containers.scm7
1 files changed, 4 insertions, 3 deletions
diff --git a/tests/containers.scm b/tests/containers.scm
index 608902c41a..1378b10f22 100644
--- a/tests/containers.scm
+++ b/tests/containers.scm
@@ -203,9 +203,10 @@
42
;; The parent and child are in the same namespaces. 'container-excursion'
;; should notice that and avoid calling 'setns' since that would fail.
- (container-excursion (getpid)
- (lambda ()
- (primitive-exit 42))))
+ (status:exit-val
+ (container-excursion (getpid)
+ (lambda ()
+ (primitive-exit 42)))))
(skip-if-unsupported)
(test-assert "container-excursion*"