Re: Ada exception block does NOT work?



Robert A Duff <bobduff@xxxxxxxxxxxxxxxxxxxx> writes:

> type Stack_Index is range 1..whatever;
> subtype Stack_Count is Stack_Index'Base range 0..whatever;

Now I see it this idiom is obvious .. thanks!

> type Stack(Max: ...) is limited
> record
> Top: Stack_Count := 0; -- points to the top element of the stack
> Elements: Element_Array(1..Max);
> end record;
>
> Do you think "points to" is confusing in the above comment?

Yes, a bit (sorry)
.