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