------- Additional Comments From tobi at gcc dot gnu dot org 2005-02-27 18:41
-------
Fixed form testcase which doesn't need the data file:
program ntst
character*16 bufld
character*142 line
line = ' 1 axxxx 1 54.3000 35.3000 rrrabcrbbbbxxxx'
1 //'b 1200. 13p3 33333'
write(*,*) 'write values on the line ',line
write(*,*)
read (line,79) bufld,budelt
79 format (t43,a16,t61,f8.0)
write(*,*) 'write 2 values from the line ',bufld,budelt
write(*,*)
33 continue
end
Works with g77, output:
write values on the line
1 axxxx 1 54.3000 35.3000 rrrabcrbbbbxxxxb 1200. 13p3
33333
write 2 values from the line rrrabcrbbbbxxxxb 1200.
Runtime error with gfortran.
--
What |Removed |Added
----------------------------------------------------------------------------
Status|UNCONFIRMED |NEW
Ever Confirmed| |1
Last reconfirmed|0000-00-00 00:00:00 |2005-02-27 18:41:12
date| |
Summary|Gfortran internal read error|runtime error reading float
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=20236
