diff options
Diffstat (limited to 'gcc/testsuite/gfortran.dg/read_empty_file.f')
| -rw-r--r-- | gcc/testsuite/gfortran.dg/read_empty_file.f | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/testsuite/gfortran.dg/read_empty_file.f b/gcc/testsuite/gfortran.dg/read_empty_file.f index d4077481bda..bf0f8622137 100644 --- a/gcc/testsuite/gfortran.dg/read_empty_file.f +++ b/gcc/testsuite/gfortran.dg/read_empty_file.f @@ -2,6 +2,6 @@ ! PR43320 Missing EOF on read from empty file. open(8,status='scratch',form='formatted') ! Create empty file read(8,'(a80)', end=123) ! Reading from an empty file should be an EOF - call abort + STOP 1 123 continue end |