Bug#277845: gfortran-4.0: internal error with namelist
Package: gfortran-4.0
Version: 4.0-0pre0
Severity: normal
Tags: experimental
$ 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
-- System Information:
Debian Release: 3.1
APT prefers unstable
APT policy: (500, 'unstable'), (1, 'experimental')
Architecture: i386 (i686)
Kernel: Linux 2.6.8-1-k7
Locale: LANG=C, LC_CTYPE=de_DE@euro
Versions of packages gfortran-4.0 depends on:
ii gcc-4.0 4.0-0pre0 The GNU C compiler
ii gcc-4.0-base 4.0-0pre0 The GNU Compiler Collection (base
ii libc6 2.3.2.ds1-18 GNU C Library: Shared libraries an
ii libgfortran0 4.0-0pre0 Runtime library for GNU Fortran ap
ii libgmp3 4.1.4-3 Multiprecision arithmetic library
-- no debconf information
Reply to: