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

Reply via email to