From: Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
Date: Tue, 18 Aug 2015 19:58:15 +0000 (+0000)
Subject: re PR libfortran/66936 (io/unix.c gratuitously uses S_IRWXG and S_IRWXO on the basis... 
X-Git-Tag: releases/gcc-4.9.4~640
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=eb5b5551ba8a8ef5ee5b071cf84a1c96f29343e6;p=thirdparty%2Fgcc.git

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: r226989
---

diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog
index 3f2ef6806deb..132f12c81a0a 100644
--- a/libgfortran/ChangeLog
+++ b/libgfortran/ChangeLog
@@ -1,3 +1,8 @@
+2015-08-18  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
+
+	PR libfortran/66936
+	* io/unix.c (__MINGW32__): Undefine HAVE_UMASK.
+
 2015-07-29  Uros Bizjak  <ubizjak@gmail.com>
 
 	PR libgfortran/66650
diff --git a/libgfortran/io/unix.c b/libgfortran/io/unix.c
index a2df440e2877..a6b46f8854db 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__ */