This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug libfortran/18122] gfortran internal error in namelist read
- From: "pinskia at gcc dot gnu dot org" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: 22 Jan 2005 00:17:48 -0000
- Subject: [Bug libfortran/18122] gfortran internal error in namelist read
- References: <20041023092537.18122.Thomas.Koenig@online.de>
- Reply-to: gcc-bugzilla at gcc dot gnu dot org
------- Additional Comments From pinskia at gcc dot gnu dot org 2005-01-22 00:17 -------
$ cat namel.inp
&foo
a= 2.300000 ,/
$ cat namel-tst.f90
program sechs_w
implicit none
integer, parameter :: dr=selected_real_kind(15)
integer, parameter :: nkmax=6
real(kind=dr) :: rb(nkmax)
integer :: z
real(kind=dr) :: dg
real(kind=dr) :: a
real(kind=dr) :: da
real(kind=dr) :: delta
real(kind=dr) :: s,t
integer :: nk
real(kind=dr) alpha0
real(kind=dr) :: phi, phi0, rad, rex, zk, z0, drdphi, dzdphi
namelist /schnecke/ z, dg, a, t, delta, s, nk, rb, alpha0
read (*,schnecke)
write (*,schnecke)
end program sechs_w
$ cat nam.inp
&SCHNECKE
z=1,
dg=58.4,
a=48.,
delta=0.4,
s=0.4,
nk=6,
rb=60, 0, 40,
alpha0=20.,
/
$ gfortran-4.0 namel-tst.f90
$ ./a.out < nam.inp
At line 22 of file namel-tst.f90
Internal Error: Can not match a namelist variable
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=18122