summaryrefslogtreecommitdiff
path: root/test-suite/standalone/test-close-on-exec
diff options
context:
space:
mode:
Diffstat (limited to 'test-suite/standalone/test-close-on-exec')
-rwxr-xr-xtest-suite/standalone/test-close-on-exec3
1 files changed, 3 insertions, 0 deletions
diff --git a/test-suite/standalone/test-close-on-exec b/test-suite/standalone/test-close-on-exec
index 1eb46c20a..6525f0d77 100755
--- a/test-suite/standalone/test-close-on-exec
+++ b/test-suite/standalone/test-close-on-exec
@@ -4,6 +4,9 @@ exec guile -q -s "$0" "$@"
;;; Exercise the 'e' flag to 'open-file' (O_CLOEXEC).
+(unless (provided? 'fork)
+ (exit 77))
+
(define file
(string-append (or (getenv "TMPDIR") "/tmp")
"/guile-test-close-on-exec-"