From 18a2180daa88bc69ff62d1de6aaeaf2705a4fbe5 Mon Sep 17 00:00:00 2001 From: Francois-Xavier Coudert Date: Sun, 9 Aug 2015 16:43:42 +0000 Subject: [PATCH] re PR libfortran/66936 (io/unix.c gratuitously uses S_IRWXG and S_IRWXO on the basis that umask() is available) PR libfortran/66936 * io/unix.c (__MINGW32__): Undefine HAVE_UMASK. From-SVN: r226750 --- libgfortran/ChangeLog | 5 +++++ libgfortran/io/unix.c | 6 ++++++ 2 files changed, 11 insertions(+) diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog index ffd6cfd3cbf..0cfc80de21b 100644 --- a/libgfortran/ChangeLog +++ b/libgfortran/ChangeLog @@ -1,3 +1,8 @@ +2015-08-09 Francois-Xavier Coudert + + PR libfortran/66936 + * io/unix.c (__MINGW32__): Undefine HAVE_UMASK. + 2015-08-07 Francois-Xavier Coudert PR libfortran/66458 diff --git a/libgfortran/io/unix.c b/libgfortran/io/unix.c index a1ce9a3ffe7..4d8726c494b 100644 --- a/libgfortran/io/unix.c +++ b/libgfortran/io/unix.c @@ -101,6 +101,12 @@ id_from_fd (const int fd) } #endif /* HAVE_WORKING_STAT */ + + +/* On mingw, we don't use umask in tempfile_open(), because it + doesn't support the user/group/other-based permissions. */ +#undef HAVE_UMASK + #endif /* __MINGW32__ */ -- 2.30.2