open(unit=10,access='SEQUENTIAL')
do I = 1,200
write(10,*)I
end do
backspace(10)
backspace(10)
read(10,*)I
print*,I
end
gives a runtime error. it should report "199", just like g77.
--
Summary: BACKSPACE broken
Product: gcc
Version: 4.0.0
Status: UNCONFIRMED
Severity: normal
Priority: P2
Component: libfortran
AssignedTo: unassigned at gcc dot gnu dot org
ReportedBy: bdavis at gcc dot gnu dot org
CC: gcc-bugs at gcc dot gnu dot org
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=18284
