Re: Package Hierarchy and Private functions

[Robert A Duff <bobduff@shell01.TheWorld.com>]

"RasikaSrinivasan@gmail.com" <RasikaSrinivasan@gmail.com> writes:

> Supposing we have 2 packages like :
>
> package P is
>   type Pvt_T is private ;
> private
>   type Pvt_T is ... ;
>   procedure Pvt_Proc(p : in out Pvt_T) ;
> end P ;
>
> ---------------------
>
> package P.C is
> ....
> end P.C ;
>
> ------------------
>
> Is there a way for P.C to access Pvt_Proc (instead of making it
> public).

The contents of P's private part are visible in the private part and the
body of P.C.  It's similar to putting a package C nested inside P,
but not exactly the same.

If you make P.C into a private child package:

private package P.C is
...
end P.C ;

then the contents of P's private part are visible in ALL of P.C,
including its visible part.

> I guess this may be analogous to protected in C++?

Yeah, sort of.

- Bob