This is the mail archive of the
fortran@gcc.gnu.org
mailing list for the GNU Fortran project.
Re: PRIVATE symbol in PUBLIC namelist
- From: Tobias Burnus <burnus at net-b dot de>
- To: Paul Richard Thomas <paul dot richard dot thomas at gmail dot com>
- Cc: jaydub66 at googlemail dot com, "fortran at gcc dot gnu dot org" <fortran at gcc dot gnu dot org>
- Date: Thu, 28 Jun 2007 09:59:26 +0200
- Subject: Re: PRIVATE symbol in PUBLIC namelist
- References: <339c37f20706272355p6d50d06aneb37e794f056b4dc@mail.gmail.com>
Hi,
Paul Richard Thomas wrote:
> Then, in addition to checking if the symbol is
> private, you then need to check if the symbol is use associated (ie.
> if (sym->attr.private && sym->attr.use_assoc). This should yield the
> correct behaviour.
This is not the problem (though that was also my first idea): One can
not use associate such a symbol ("has no IMPLICIT type"). What the logic
wants to prevent is a (public) namelist in the specification part of a
module which has private items:
module mod
real, private :: r
namelist /n/ r ! cannot be PRIVATE in a PUBLIC namelist
end module mod
use mod
real(44,nml=n)
end
Tobias