Re: Array of Strings

["Jeffrey R. Carter" <spam.jrcarter.not@spam.acm.org>]

jedivaughn wrote:
> If I wanted to make a package that made the array generic how would I
> go about doing this. this is what I have which isn't working.
> 
>     generic
> 
>     type Element_Type is (<>);

This specifies that the actual for Element_Type must a discrete type, as the 
error msg indicates.

>     type range1 is (<>);
> 
> 
>    package list is
>         type letters is private;
> 
>  	private
>         type letters is array (range1) of Element_Type;
> 
> end list;
> 
> 
> and then in the main program I want
> 
>  subtype range2 is integer range 1..25;
>  subtype str_length is string (1..25);

Presumably you want Element_Type to be private, which allows any non-limited 
type you can declare an object of without an initialization. I presume you're 
doing this to learn about generics, since what you have here doesn't do anything 
worthwhile.

There is also a way to define your component type as an array type:

generic -- List
    type Element_Component is private;
    type Element_Index is (<>);
    type Element is array (Element_Index) of Element_Component;
    type Letters_Index is (<>);
package List is
    type Letters is private;
private -- List
    type Letters is array (Letters_Index) of Element;
end List;

This is more restrictive than private.

-- 
Jeff Carter
"Sir Lancelot saves Sir Gallahad from almost certain temptation."
Monty Python & the Holy Grail
69