Re: Generalized Iterators

["Randy Brukardt" <randy@rrsoftware.com>]

"AdaMagica" <christ-usch.grein@t-online.de> wrote in message 
news:aea9159f-c02c-4a08-915a-504227424bd9@googlegroups.com...
> I'm experiencing problems with generalized iterators. The code below is 
> reduced
> to the minimum in order to be compilable and show the problem. Note that 
> the
> body of Circularly_Linked_Lists is not given since not needed to produce 
> the
> problem.
>
> The code follows strictly the examples given in the Ada 2012 Rationale.
> Expecially the function Iterate is defined thus:
>
>  function Iterate (CLL: not null access Circularly_Linked_List)
>    return Forward_Iterator'Class;
>
> This produces the compiler message (GNAT GPL 2015)
>
>  for Cursor in List.Iterate loop
> ausprobieren.adb:15:21: expect object that implements iterator interface
>
...
I get the same result with the compiler I have. (It's probably newer than 
GPL 2015, but I'm not certain as it is a wavefront for a problem last year.)

...
> I can understand this since Iterate has the list as an access parameter,
> and the compiler tries to construct the "in" loop from the default 
> iterator.
> But also this does not work:
>
>  for Int of List'Access loop
>
> Is this a problem of GNAT or is there anything I just don't see?

Looks like a problem of GNAT. Didn't we discuss something like this example 
within the last few months here??

                                    Randy.