[Bug fortran/52512] New: Cannot match namelist object name

[marco at hulten dot org]

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

             Bug #: 52512
           Summary: Cannot match namelist object name
    Classification: Unclassified
           Product: gcc
           Version: 4.4.6
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned@gcc.gnu.org
        ReportedBy: marco@hulten.org


Created attachment 26843
  --> http://gcc.gnu.org/bugzilla/attachment.cgi?id=26843
namelist

During run-time I get the error "Cannot match namelist object name".  This
*might* be the same as #51825, but that one is about writing to the namelist,
while this is about reading.  To not make any confusion if it is indeed
different, I created a new bug.  I compiled the following code with gfortran
4.4.6 (on RHEL6.2):

PROGRAM testje
      IMPLICIT NONE

      INTEGER :: getal, jn
      TYPE PTRACER
         CHARACTER(len = 8)  :: sname  !: short name
         LOGICAL             :: lini   !: read in a file or not
      END TYPE PTRACER
      TYPE(PTRACER) , DIMENSION(3) :: tracer
      NAMELIST/namtoptrc/  getal,tracer

      ! Standard values
      getal = 9999
      DO jn = 1, 3
         tracer(jn)%sname = 'DEFAULT_NAME'
         tracer(jn)%lini = .FALSE.
      END DO

      open (99, file='nml.dat')
      read (99, nml=namtoptrc)
      write (*, nml=namtoptrc)
END PROGRAM testje

I enclosed the namelist.  It runs fine with ifort.