diff options
-rw-r--r-- | libguile/posix.c | 4 |
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) |