$ cat foo.f90
program main
  real :: a(5)
  namelist /foo/ a
  read (*,foo)
  write (*,*) a
end program main
$ cat foo.nml
&foo
a = 4*1.2, 1.5 /
$ gfortran-4.0 foo.f90
$ ./a.out < foo.nml
   2.011467      -1.999733      1.4012985E-45   2.057415       2.057416
$ cat foo2.nml
&foo
a = 1.2, 1.2, 1.2, 1.5 /
$ ./a.out < foo2.nml
   2.011467      -1.999733      1.4012985E-45   2.057415       2.057416
$ gfortran-4.0 -v
Reading specs from /usr/lib/gcc/i486-linux/4.0.0/specs
Configured with: ../src/configure -v --enable-languages=c,c++,java,f95,objc
--prefix=/usr --libexecdir=/usr/lib --with-gxx-include-dir=/usr/include/c++/4.0
--enable-shared --with-system-zlib --enable-nls --enable-threads=posix
--without-included-gettext --program-suffix=-4.0 --enable-__cxa_atexit
--enable-libstdcxx-allocator=mt --enable-clocale=gnu --enable-libstdcxx-debug
--enable-java-gc=boehm --enable-java-awt=gtk i486-linux
Thread model: posix
gcc version 4.0.0 20040912 (experimental) (Debian 4.0-0pre0)

-- 
           Summary: namelist read does not work for arrays
           Product: gcc
           Version: 4.0.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P2
         Component: libfortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: Thomas dot Koenig at online dot de
                CC: gcc-bugs at gcc dot gnu dot org


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=18209

Reply via email to