diff options
-rw-r--r-- | gcc/testsuite/ChangeLog | 5 | ||||
-rw-r--r-- | gcc/testsuite/gfortran.dg/negative_unit_int8.f | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 1fc0241..a0ee68c 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -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> PR target/52076 diff --git a/gcc/testsuite/gfortran.dg/negative_unit_int8.f b/gcc/testsuite/gfortran.dg/negative_unit_int8.f index d4c3557..9b4042e 100644 --- a/gcc/testsuite/gfortran.dg/negative_unit_int8.f +++ b/gcc/testsuite/gfortran.dg/negative_unit_int8.f @@ -30,6 +30,6 @@ ! This one is nasty inquire (unit=i, exist=l, iostat=i) if (l) call abort - if (i.ne.ERROR_BAD_UNIT) call abort + if (i.ne.0) call abort end |