From: "Hibou57 (Yannick Duchêne)" <yannick_duchene@yahoo.fr>
Subject: Re: Indirect visibility of private part in child packages
Date: Thu, 4 Jun 2009 07:04:44 -0700 (PDT)
Date: 2009-06-04T07:04:44-07:00 [thread overview]
Message-ID: <43b740a9-8f27-4dc2-a777-c4ac64382bf8@s12g2000yqi.googlegroups.com> (raw)
In-Reply-To: wcc1vq02kxu.fsf@shell01.TheWorld.com
On 4 juin, 15:22, Robert A Duff <bobd...@shell01.TheWorld.com> wrote:
> >> Maybe you can solve your problem like this:
>
> >> package body P1.P3 is
> >> procedure A_Primitive (Item : out T3_Type) is
> >> begin
> >> T1_Type (Item).Low_Level_Data := ...;
> >> end A_Primitive;
> >> end P1.P3;
>
> > I've just tried it, and it does not work better. The compiler
> > complains there are not selector Low_Level_Data for T1_Type.
>
> Are you sure? Converting to T1_Type should work. P3 can see that
> T1_Type has a Low_Level_Data component.
I sware, it is rejected. I agree this is strange.
A GNAT bug ? If it is, perhaps this is the answer to the other
question as well (the question about the visibility).
next prev parent reply other threads:[~2009-06-04 14:04 UTC|newest]
Thread overview: 7+ messages / expand[flat|nested] mbox.gz Atom feed top
2009-06-04 5:45 Indirect visibility of private part in child packages Hibou57 (Yannick Duchêne)
2009-06-04 7:50 ` Ludovic Brenta
2009-06-04 11:47 ` Hibou57 (Yannick Duchêne)
2009-06-04 13:22 ` Robert A Duff
2009-06-04 14:04 ` Hibou57 (Yannick Duchêne) [this message]
2009-06-04 16:06 ` Adam Beneschan
2009-06-04 16:33 ` Hibou57 (Yannick Duchêne)
replies disabled
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox