Re: friend classes in ada95

[Jeff Carter <jrcarter@acm.org>]

Stefan Folkesson wrote:
> 
> In ADA95, is there a way to make the private part of one class
> accessable from another (see friend classes in C++)?

From ARM N.6:

Class.  A class is a set of types that is closed under derivation, which
means that if a given type is in the class, then all types derived from
that type are also in the class. The set of types of a class share
common properties, such as their primitive operations.

Therefore, classes do not have private parts. Packages, protected types,
and task types have private parts.

Others have answered the intent of your question ([private] child
packages). I would just like to say that if you try to write C++ in Ada
you will find it as ugly and difficult as trying to write Ada in C++.

In C++, the class construct provides for type definition and extension,
encapsulation, and information hiding. In Ada, packages provide for
modularity, encapsulation, and information hiding, while the type system
provides for type definition and extension.

> Is this possible? Is there a pragma to supress the access check or do 

In general, unless you are doing something very low level, if you are
considering suppressing or bypassing the language checks then you are
going about something the wrong way.
-- 
Jeff Carter
"You tiny-brained wipers of other people's bottoms!"
Monty Python & the Holy Grail