From: Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
Date: Sun, 18 May 2008 17:55:39 +0000 (+0000)
Subject: stat_1.f90: Skip on mingw.
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=4ac3f385f719274f43e452031e7ac6e9df43c5e3;p=gcc.git

stat_1.f90: Skip on mingw.

	* gfortran.dg/stat_1.f90: Skip on mingw.
	* gfortran.dg/stat_2.f90: Skip on mingw.

From-SVN: r135506
---

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index d7ad2ec1bd3..0e67e25c755 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+2008-05-18  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
+
+	* gfortran.dg/stat_1.f90: Skip on mingw.
+	* gfortran.dg/stat_2.f90: Skip on mingw.
+
 2008-05-18  Steven G. Kargl  <kargls@comcast.net>
 
 	PR fortran/36251
diff --git a/gcc/testsuite/gfortran.dg/stat_1.f90 b/gcc/testsuite/gfortran.dg/stat_1.f90
index b9dc10095d2..df60c3948f2 100644
--- a/gcc/testsuite/gfortran.dg/stat_1.f90
+++ b/gcc/testsuite/gfortran.dg/stat_1.f90
@@ -1,4 +1,5 @@
 ! { dg-do run { target fd_truncate } }
+! { dg-skip-if "" { *-*-mingw* } { "*" } { "" } }
 ! { dg-options "-std=gnu" }
   character(len=*), parameter :: f = "testfile"
   integer :: s1(13), r1, s2(13), r2, s3(13), r3
diff --git a/gcc/testsuite/gfortran.dg/stat_2.f90 b/gcc/testsuite/gfortran.dg/stat_2.f90
index b57b52f9300..4622395c34d 100644
--- a/gcc/testsuite/gfortran.dg/stat_2.f90
+++ b/gcc/testsuite/gfortran.dg/stat_2.f90
@@ -1,4 +1,5 @@
 ! { dg-do run { target fd_truncate } }
+! { dg-skip-if "" { *-*-mingw* } { "*" } { "" } }
 ! { dg-options "-std=gnu" }
   character(len=*), parameter :: f = "testfile"
   integer :: s1(13), r1, s2(13), r2, s3(13), r3