FreeChainXenon/gcc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

stat_1.f90: Skip on mingw.

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

From-SVN: r135506
This commit is contained in:
Francois-Xavier Coudert 2008-05-18 17:55:39 +00:00 • committed by François-Xavier Coudert
parent 5fba1c4c6d
commit 4ac3f385f7
3 changed files with 7 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
gcc/testsuite/ChangeLog
View file

@ -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

1
gcc/testsuite/gfortran.dg/stat_1.f90
View file

@ -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

1
gcc/testsuite/gfortran.dg/stat_2.f90
View file

@ -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