[Bug fortran/29563] Internal read loses data.

[pault at gcc dot gnu dot org]

------- Comment #1 from pault at gcc dot gnu dot org  2006-10-23 15:54 -------
   program gfbread
     character(len=256), dimension(3) :: block_data = (/' 1 2 3',' 4 5 6',' 7 8
9'/)
     real(kind=8), dimension(3,3) :: tmp_box
     read(block_data,'(3(3f2.0/))',iostat=iostat)((tmp_box(i,j),j=1,3),i=1,3)
     write(*,'(3F10.5)') ((tmp_box(i,j),j=1,3),i=1,3)
   end program gfbread

works fine - the only difference in the code is the io call, so I would guess
that something is awry with list_read.c

Any ideas, Jerry?

Paul


-- 

pault at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |jvdelisle at gcc dot gnu dot
                   |                            |org


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