http://gcc.gnu.org/bugzilla/show_bug.cgi?id=56803
Bug #: 56803
Summary: EOF with namelist read give INTERNAL error instead of
END OF FILE error
Classification: Unclassified
Product: gcc
Version: 4.9.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
AssignedTo: unassig...@gcc.gnu.org
ReportedBy: bur...@gcc.gnu.org
CC: jvdeli...@gcc.gnu.org
Blocks: 56744
Follow up to PR56660 comment 19, see also PR56660.
The following program - which lacks a "/" - gives with GCC 4.1:
Fortran runtime error: End of file
But with GCC 4.3 to 4.9 it gives:
Fortran runtime error: Internal namelist read error
Expected: END of file. Which I also get with NAG, Pathscale, PGI and Crayftn.
implicit none
integer :: ii
namelist /nml/ ii
open(99, status="scratch")
write(99,'(a)') "&nml ii=55"
rewind(99)
read(99, nml=nml)
print *, ii
end
