This is the mail archive of the gcc-bugs@gcc.gnu.org mailing list for the GCC project.


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]
Other format: [Raw text]

[Bug fortran/32876] Wrongly accepts private items in public NAMELISTs



------- 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


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]