diff options
author | Ludovic Courtès <ludo@gnu.org> | 2009-12-15 20:14:02 +0100 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2009-12-15 20:14:19 +0100 |
commit | 1cd4fffcde4edd4853e039da9a42e0972d851a51 (patch) | |
tree | 82c1f750fd5acf88414b85a421c7b7212d9efcfc /lib/write.c | |
parent | 20ccae8dbb8d92a6a32e0275c517f70961c6b833 (diff) | |
download | guile-1cd4fffcde4edd4853e039da9a42e0972d851a51.tar.gz |
Use Gnulib's `sys_stat' module; update Gnulib.
* .x-sc_prohibit_S_IS_definition: New file.
* m4/gnulib-cache.m4: Add `sys_stat'.
* libguile/filesys.c: Remove `S_IS*' macro definitions for Ultrix and
MinGW.
Diffstat (limited to 'lib/write.c')
-rw-r--r-- | lib/write.c | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/lib/write.c b/lib/write.c index a8056ca8e..a99bf5bcc 100644 --- a/lib/write.c +++ b/lib/write.c @@ -46,14 +46,14 @@ rpl_write (int fd, const void *buf, size_t count) if (ret < 0) { if (GetLastError () == ERROR_NO_DATA - && GetFileType ((HANDLE) _get_osfhandle (fd)) == FILE_TYPE_PIPE) - { - /* Try to raise signal SIGPIPE. */ - raise (SIGPIPE); - /* If it is currently blocked or ignored, change errno from EINVAL - to EPIPE. */ - errno = EPIPE; - } + && GetFileType ((HANDLE) _get_osfhandle (fd)) == FILE_TYPE_PIPE) + { + /* Try to raise signal SIGPIPE. */ + raise (SIGPIPE); + /* If it is currently blocked or ignored, change errno from EINVAL + to EPIPE. */ + errno = EPIPE; + } } return ret; } |