[Bug libfortran/20471] New: Segmentation fault on read after backspace and rewind

[dir at lanl dot gov]

Using the 03-13-05 Macintosh image of gfortran, I get this error -

[dranta:~/tests/gfortran] dir% gfortran -o backspace4 backspace4.f
[dranta:~/tests/gfortran] dir% backspace4
Segmentation fault
[dranta:~/tests/gfortran] dir% cat backspace4.f
      program main
      dimension x(100)
      n10=10
      write(3)n10,(x(n),n=1,n10)
      backspace 3
      rewind 3
      read(3)n10,(x(n),n=1,n10)
      stop
      end

-- 
           Summary: Segmentation fault on read after backspace and rewind
           Product: gcc
           Version: 4.0.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P2
         Component: libfortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: dir at lanl dot gov
                CC: gcc-bugs at gcc dot gnu dot org
  GCC host triplet: powerpc-apple-darwin7.8.0


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=20471