diff options
| author | Michael Gran <spk121@yahoo.com> | 2022-11-10 14:48:50 -0800 |
|---|---|---|
| committer | Michael Gran <spk121@yahoo.com> | 2022-11-10 14:48:50 -0800 |
| commit | 3c9052b2614071c7af2a04dc1c9868e315c14e45 (patch) | |
| tree | f4f2390ac9a6e6b92d75ee3733c3a9d8c29f177b | |
| parent | 591e10a121bae5851a796dead0b2df97d08b628f (diff) | |
Avoid mysterious "error no error" message in pipewip-mingw
* libguile/posix.c (pipe)[!HAVE_PIPE2]: set errno to ENOSYS
when pipe2 is missing
| -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) |