[Bug libf2c/18874] New: ? in namelist read leads to I/O recursion

[Thomas dot Koenig at online dot de]

Typing "?" for a namelist input is supposed to
yield a description of the input variables on
standard output.  This doesn't work with g77:

$ g77 -v
Reading specs from /usr/lib/gcc-lib/ia64-redhat-linux/3.2.3/specs
Configured with: ../configure --prefix=/usr --mandir=/usr/share/man
--infodir=/usr/share/info --enable-shared --enable-threads=posix
--disable-checking --with-system-zlib --enable-__cxa_atexit --host=ia64-redhat-linux
Thread model: posix
gcc version 3.2.3 20030502 (Red Hat Linux 3.2.3-42)
$ ./a.out
$ cat nl.f
      program main
      namelist /nl/ a
      read (*,nl)
      print *,a
      end
$ g77 nl.f && a.out
?
I/O recursion: I/O started while already doing I/O
apparent state: unit 5 (unnamed)
last format: list io
lately reading direct formatted external IO
Aborted

-- 
           Summary: ? in namelist read leads to I/O recursion
           Product: gcc
           Version: 3.2.3
            Status: UNCONFIRMED
          Severity: normal
          Priority: P2
         Component: libf2c
        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=18874