Re: friend classes in ada95

[Stefan Folkesson <stefan.folkesson@emw.ericsson.se>]

Yes, this is what I've done so far, but I'd rather like to separate the
different classes logically in the file structure (1 class <==> 1 file).
I do not want to mix the operations for two objects in the same package.

Another approach I have considered is to let the Iterator package be a
child package to Aggregate (the Iterator type does not inherit from the
Aggregate type)

package Aggregate is

  type T_Aggregate is private;

private
  .   .   .
end Aggregate;

package Aggregate.Iterator is

  type T_Iterator is private;

private
  .   .   .
end Aggregate.Iterator;

This would work, I think, but I want to consider other alternatives if
there are any.

/Stefan