Re: Usage of Interfaces with Ada 95

[Matthew Heaney <matthewjheaney@earthlink.net>]

Michael Erdmann <Michael.Erdmann@snafu.de> writes:

> Maybe i need drop my original idea completley. The idea was to provide
> a set of interfaces which are allowing to develop software based on
> concepts (patterns). The Enumeration is such a concept beside of a lot
> of other patterns.  My hope was/is to simplyfy code by using standard
> patterns.

What's wrong with generic algoriths?  An "enumeration" (an unfortunate
term, given that is it already has a very specific meaning in Ada)
smells a lot like an "iterator," so I hvae to ask why you don't simply
go that way:

generic
   type Iterator_Type is private;
   with function Succ (Iterator : Iterator_Type)
      return Iterator_Type is <>;
   with procedure Process (Iterator : Iterator_Type) is <>;
   ...
procedure Generic_Algorithms (First, Back : Iterator_Type);

But perhaps you're trying to do something else?  It wasn't clear from
your example.  As far I can tell the language already does everything
you need, so no language change is required.