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