diff options
Diffstat (limited to 'gcc/testsuite/gfortran.dg/write_check3.f90')
| -rw-r--r-- | gcc/testsuite/gfortran.dg/write_check3.f90 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/testsuite/gfortran.dg/write_check3.f90 b/gcc/testsuite/gfortran.dg/write_check3.f90 index 802a06d27a9..cffaa9e1e0d 100644 --- a/gcc/testsuite/gfortran.dg/write_check3.f90 +++ b/gcc/testsuite/gfortran.dg/write_check3.f90 @@ -6,6 +6,6 @@ program us_recl integer :: istatus open(unit=10, form="unformatted", access="sequential", RECL=16) write(10, iostat=istatus) array - if (istatus == 0) call abort() + if (istatus == 0) STOP 1 close(10, status="delete") end program us_recl |