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

re PR libfortran/47439 (Fun with scratch files on Windows MKTEMP only allows for 26 files)

Browse source 
PR libfortran/47439
	* gfortran.dg/scratch_1.f90: Adjust test.

From-SVN: r171180
This commit is contained in:
Francois-Xavier Coudert 2011-03-19 14:35:05 +00:00 • committed by François-Xavier Coudert
parent 14bef49e53
commit 16e329fbae
2 changed files with 7 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
gcc/testsuite/ChangeLog
View file

@ -1,4 +1,9 @@
2011-03-16 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
2011-03-19 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
PR libfortran/47439
* gfortran.dg/scratch_1.f90: Adjust test.
2011-03-19 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
PR libfortran/47439
* gfortran.dg/scratch_1.f90: New test.

2
gcc/testsuite/gfortran.dg/scratch_1.f90
View file

@ -1,7 +1,7 @@
! { dg-do run }
! Check that we can open more than 26 scratch files concurrently
integer :: i
do i = 1, 3000
do i = 1, 30
print *, i
open(100+i,status="scratch")
end do