Commit 02e694ef by Thomas Koenig

re PR fortran/68746 (FAIL: gfortran.dg/read_dir.f90 -O0 execution test)

2018-02-12  Thomas Koenig  <tkoenig@gcc.gnu.org>

	PR fortran/68746
	* gfortran.dg/read_dir.f90: Remove xfails. Also allow iostat
	of zero for read.

From-SVN: r257604
parent e9bfdf18
2018-02-12 Thomas Koenig <tkoenig@gcc.gnu.org>
PR fortran/68746
* gfortran.dg/read_dir.f90: Remove xfails. Also allow iostat
of zero for read.
2018-02-12 Jeff Law <law@redhat.com> 2018-02-12 Jeff Law <law@redhat.com>
* gcc.c-torture/compile/reg-args-size.c: New test. * gcc.c-torture/compile/reg-args-size.c: New test.
......
! { dg-do run { xfail *-*-freebsd* *-*-dragonfly* hppa*-*-hpux* powerpc-ibm-aix* } }
! PR67367 ! PR67367
program bug program bug
implicit none implicit none
...@@ -12,7 +11,7 @@ program bug ...@@ -12,7 +11,7 @@ program bug
call abort call abort
end if end if
read(10, iostat=ios) c read(10, iostat=ios) c
if (ios.ne.21) then if (ios.ne.21.and.ios.ne.0) then
close(10, status='delete') close(10, status='delete')
call abort call abort
end if end if
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment