diff options
Diffstat (limited to 'gcc/testsuite/gfortran.dg/empty_format_1.f90')
| -rw-r--r-- | gcc/testsuite/gfortran.dg/empty_format_1.f90 | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/testsuite/gfortran.dg/empty_format_1.f90 b/gcc/testsuite/gfortran.dg/empty_format_1.f90 index ad60afa3f47..b0396cbd5da 100644 --- a/gcc/testsuite/gfortran.dg/empty_format_1.f90 +++ b/gcc/testsuite/gfortran.dg/empty_format_1.f90 @@ -14,10 +14,10 @@ program main write (io_unit, '(A)') "Line3" rewind (io_unit) read (io_unit,'(A)') str - if (str .ne. "Line1") call abort + if (str .ne. "Line1") STOP 1 read (io_unit,'()') read (io_unit,'(A)') str - if (str .ne. "Line3") call abort + if (str .ne. "Line3") STOP 2 close(unit=io_unit) end |