re PR fortran/45943 (gfortran.dg/streamio_16.f90: Fails under MinGW64 - probably \r\n vs \n issue)
2010-10-08 Jerry DeLisle <jvdelisle@gcc.gnu.org> PR fortran/45943 * gfortran.dg/streamio_16.f90: Update test. From-SVN: r165208
This commit is contained in:
parent
9ad17c6ae8
commit
97de8e32b6
|
@ -1,3 +1,8 @@
|
||||||
|
2010-10-08 Jerry DeLisle <jvdelisle@gcc.gnu.org>
|
||||||
|
|
||||||
|
PR fortran/45943
|
||||||
|
* gfortran.dg/streamio_16.f90: Update test.
|
||||||
|
|
||||||
2010-10-08 Jakub Jelinek <jakub@redhat.com>
|
2010-10-08 Jakub Jelinek <jakub@redhat.com>
|
||||||
|
|
||||||
PR tree-optimization/45903
|
PR tree-optimization/45903
|
||||||
|
|
|
@ -10,7 +10,7 @@ do i=1,17
|
||||||
read( 50, *,pos=i)
|
read( 50, *,pos=i)
|
||||||
inquire(50, access=sAccess, pos=mypos)
|
inquire(50, access=sAccess, pos=mypos)
|
||||||
if (sAccess.ne."STREAM") call abort
|
if (sAccess.ne."STREAM") call abort
|
||||||
if (mypos.ne.18) call abort
|
if ((mypos.ne.18).and.(mypos.ne.19)) call abort
|
||||||
end do
|
end do
|
||||||
read (50,*, end=10)
|
read (50,*, end=10)
|
||||||
call abort
|
call abort
|
||||||
|
|
Loading…
Reference in New Issue