[Bug libfortran/25697] New: libfortran - Segmentation fault/ Bad Address on unformatted read

[dir at lanl dot gov]

On the Macintosh this program gives a "Segmentation fault" on Linux it gives
"Fortran runtime error: Bad address"

dranta:~/tests/gfortran-D] dir% gfortran -o write19 write19.f
[dranta:~/tests/gfortran-D] dir% write19
Segmentation fault
[dranta:~/tests/gfortran-D] dir% cat write19.f
      integer data(500)
      do i = 1,500
        data(i)=-1
      enddo
      open(unit=11,status='scratch',form='unformatted')
       read(11,end=        1000 )data
 1000  continue
       backspace 11
       write(11)data
       read(11,end=        1001 )data
 1001  continue
       backspace 11
       backspace 11
       write(11)data
       rewind 11
       backspace 11
       read(11,end=        1002 )data
 1002  continue
       read(11,end=        1003 )data
 1003  continue
       close(11)
       end

dranta:~/tests/gfortran-D] dir% gfortran --v
Using built-in specs.
Target: powerpc-apple-darwin8.3.0
Configured with: ../gcc/configure --prefix=/Users/dir/gfortran
--enable-languages=c,f95
Thread model: posix
gcc version 4.2.0 20060106 (experimental)
[dranta:~/tests/gfortran-D] dir%


-- 
           Summary: libfortran - Segmentation fault/ Bad Address on
                    unformatted read
           Product: gcc
           Version: 4.2.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: libfortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: dir at lanl dot gov


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