read_eof.f90 « execute « gfortran.fortran-torture « testsuite « gcc « gcc-4.9 - toolchain_gcc - toolchain/gcc

about summary refs log tree commit diff stats

path: root/gcc-4.9/gcc/testsuite/gfortran.fortran-torture/execute/read_eof.f90

blob: b4bc8239b23172b720d395c382df4266b48c2a39 (plain)

! PR 13919, segfault when file is empty
      open(unit=8,status='scratch')
      read(8,*,end=1)i
      call abort
1     continue
      end