Re: Protected types and visibility of their internals

["jimmaureenrogers@worldnet.att.net" <jimmaureenrogers@worldnet.att.net>]

The way that works, even if it is not quite what is desired, is:

package Stuff is
   type Some_Type is private;
   protected type Foo is
      procedure Register;
   private
      Item : Some_Type;
   end Foo;
private
   type Some_Type is new Integer;
end Stuff;

In this case only protected type Foo uses Some_Type. The composition
of
Some_Type is completely private to the enclosing package.

Jim Rogers