------- Comment #3 from burnus at gcc dot gnu dot org  2007-07-25 18:09 -------
> I think that, by extension, components with private components must be illegal
> too.

Which means checking over several levels. For the following program, g95 gives
an error. (NAG f95, ifort don't.)

> I'll have a look.
Thanks, Daniel.

module x
  type tp3
    private
    integer :: i
  end type tp3
  type tp2
    type(tp3) :: t
  end type tp2
  type tp1
    integer :: i
    type(tp2) :: t
  end type tp1
  type(tp1) :: t1
  integer :: j
  namelist /a/ t1,j
end module x


-- 


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

Reply via email to