diff options
| author | Francois-Xavier Coudert <fxcoudert@gcc.gnu.org> | 2008-05-18 17:55:39 +0000 |
|---|---|---|
| committer | François-Xavier Coudert <fxcoudert@gcc.gnu.org> | 2008-05-18 17:55:39 +0000 |
| commit | 4ac3f385f719274f43e452031e7ac6e9df43c5e3 (patch) | |
| tree | bba4ca3d02145fb27f52901473699b379f60e5fd /gcc | |
| parent | 5fba1c4c6d7b9f54478ff92313a97865df0f44ad (diff) | |
| download | gcc-4ac3f385f719274f43e452031e7ac6e9df43c5e3.zip gcc-4ac3f385f719274f43e452031e7ac6e9df43c5e3.tar.gz gcc-4ac3f385f719274f43e452031e7ac6e9df43c5e3.tar.bz2 | |
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
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/testsuite/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/testsuite/gfortran.dg/stat_1.f90 | 1 | ||||
| -rw-r--r-- | gcc/testsuite/gfortran.dg/stat_2.f90 | 1 |
3 files changed, 7 insertions, 0 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index d7ad2ec..0e67e25 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 b9dc100..df60c39 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 b57b52f..4622395 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 |