diff options
Diffstat (limited to 'test-suite/standalone/test-close-on-exec')
-rwxr-xr-x | test-suite/standalone/test-close-on-exec | 3 |
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-" |