summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--libguile/posix.c4
1 files changed, 3 insertions, 1 deletions
diff --git a/libguile/posix.c b/libguile/posix.c
index 116843bcf..274b4a16c 100644
--- a/libguile/posix.c
+++ b/libguile/posix.c
@@ -265,11 +265,13 @@ SCM_DEFINE (scm_pipe2, "pipe", 0, 1, 0,
#else
if (c_flags == 0)
rv = pipe (fd);
- else
+ else {
/* 'pipe2' cannot be emulated on systems that lack it: calling
'fnctl' afterwards to set the relevant flags is not equivalent
because it's not atomic. */
rv = ENOSYS;
+ errno = ENOSYS;
+ }
#endif
if (rv)