/sodsim/local/gcc-4.0-20050220#>gcc -v
Using built-in specs.
Target: sparc-sun-solaris2.8
Configured with: ../configure --enable-languages=c,f95
Thread model: posix
gcc version 4.0.0 20050220 (experimental)
Build with no problems.
This little test program was created as a result of a runtime error on
a large program used to test gfortran. G77 does not have this problem.
************************************************************************
program ntst
character*16 bufld
character*142 line
open (10,file='bumsls',status='old')
32 read (10,'(a)',end=33) line
if (line(1:1) .eq. '.') goto 32
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
************************************************************************
At line 14 of file ntst.f
Fortran runtime error: Bad value during floating point read
bumsls file contents 3 lines
*****************************************************************************
.
. ---- ------ --- --------- --------- ---------------- -------- ----
-----
1 axxxx 1 54.3000 35.3000 rrrabcrbbbbxxxxb 1200. 13p3
33333
--
Summary: Gfortran internal read error
Product: gcc
Version: 4.0.0
Status: UNCONFIRMED
Severity: normal
Priority: P2
Component: fortran
AssignedTo: unassigned at gcc dot gnu dot org
ReportedBy: blime at cox dot net
CC: gcc-bugs at gcc dot gnu dot org
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=20236
