re PR fortran/61933 (Inquire on internal units)
2015-01-22 Jerry DeLisle <jvdelisle@gcc.gnu.org> PR fortran/61933 * gfortran.dg/negative_unit_int8.f: Update. From-SVN: r220025
This commit is contained in:
parent
bb295963d4
commit
20056f6002
|
@ -1,3 +1,8 @@
|
||||||
|
2015-01-22 Jerry DeLisle <jvdelisle@gcc.gnu.org>
|
||||||
|
|
||||||
|
PR fortran/61933
|
||||||
|
* gfortran.dg/negative_unit_int8.f: Update.
|
||||||
|
|
||||||
2015-01-22 Jeff Law <law@redhat.com>
|
2015-01-22 Jeff Law <law@redhat.com>
|
||||||
|
|
||||||
PR target/52076
|
PR target/52076
|
||||||
|
|
|
@ -30,6 +30,6 @@
|
||||||
! This one is nasty
|
! This one is nasty
|
||||||
inquire (unit=i, exist=l, iostat=i)
|
inquire (unit=i, exist=l, iostat=i)
|
||||||
if (l) call abort
|
if (l) call abort
|
||||||
if (i.ne.ERROR_BAD_UNIT) call abort
|
if (i.ne.0) call abort
|
||||||
|
|
||||||
end
|
end
|
||||||
|
|
Loading…
Reference in New Issue