blob: b4bc8239b23172b720d395c382df4266b48c2a39 [file] [log] [blame]
! PR 13919, segfault when file is empty
open(unit=8,status='scratch')
read(8,*,end=1)i
call abort
1 continue
end