Re: generic child package

[nblanpain@hotmail.com]

yes excuse me :

generic
   type T_Toto is private;

but are you sur it is :
 with P_Child1 is new Parent.Child1;
and not
with P_Child1 is new Parent.Child1 (<>);

thanks,


Dmitry A. Kazakov a écrit :

> On 22 Jul 2006 23:44:58 -0700, nblanpain@hotmail.com wrote:
>
> > Is my example correct ? :
> >
> > ------------------------------
> > generic
> >    with type T_Toto is private;
>
> type T_Toto is private;
>
> > package Parent is
> >    pragma Pure;
> > end Parent;
> > ------------------------------
> >
> > ------------------------------
> > generic
> > package Parent.Child1 is
> >    type T_Child1 is tagged private;
> >    ....
> > end Parent.Child1;
> > ------------------------------
> >
> > ------------------------------
> > generic
> >    with P_Child1 is new Parent.Child1;   ----- or with P_Child1 is new
> > Parent.Child1 (<>); ?????
>
> with package P_Child1 is new Parent.Child1;
>
> > package Parent.Child2 is
> >    type T_Child2 is new P_Child1.T_Child1 with private;
> >    ....
> > end Parent.Child2;
> > ------------------------------
> >
> > Is there or problem or is it correct ?
>
> What about:
>
> generic
> package Parent.Child1.Grandchild1 is
>    type T_Grandchild1 is new T_Child1 with private;
>    ....
> end Parent.Child1.Grandchild1;
> 
> -- 
> Regards,
> Dmitry A. Kazakov
> http://www.dmitry-kazakov.de