[Bug fortran/55117] Programs fails to read namelist (contains derived types objects)

[tilo@tilo-schwarz.de]

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

--- Comment #18 from Tilo Schwarz <tilo@tilo-schwarz.de> 2013-02-25 20:28:40 UTC ---
(In reply to comment #17)
> (In reply to comment #15)
> > The type extension problem might be related to the fact, that gfortran does not
> > generate a namelist entry for the implicit component %x of t1e_t:
> > 
> > (no "t1e%x" below)
> > 
> It is present...
> 
> >   _gfortran_st_set_nml_var (&dt_parm.1, &t1e.t1_t.x, &"t1e%t1_t%x"[1]{lb: 1 sz:
> > 1}, 4, 0, 24);
> >
> ... here.

Yes, somehow - but the code in list_read.c:find_nml_node() (as it is right now)
searches for the exact string "t1e%x", not for "t1e%t1_t%x".

I have no idea what is simpler:

- modify the code in list_read.c to somehow also search "t1e%t1_t%x", not only
"t1e%x". Maybe one could teach the code to conclude from the to namelist
entries
  _gfortran_st_set_nml_var (&dt_parm.1, &t1e.t1_t, &"t1e%t1_t"... 
  _gfortran_st_set_nml_var (&dt_parm.1, &t1e.t1_t.x, &"t1e%t1_t%x"
that "t1e%x" is also valid a synonym of "t1e%t1_t%x".

or
- generate a line like
  _gfortran_st_set_nml_var (&dt_parm.1, &t1e.t1_t.x, &"t1e%x" ...