Re: types and non-contigous ranges

[Erlo Haugen <_elh_@_tema_._com_>]

Dmitry A. Kazakov skrev:
> On Thu, 26 Feb 2004 15:17:38 +0100, Erlo Haugen <_elh_@_tema_._com_>
> wrote:
> 
> 
>>Hello everyone,
>>what is the easiest way to define a (sub)type consisting of ranges and 
>>single values?
> 
> 
> Only ranges are allowed.
> 
> 
>>Let me give an example:
>>
>>I want a type, based on character, that contains 'A'..'Z' and '0'..'9'
>>and some single characters like '�','�' and '�'.
>>
>>subtype Valid_Characters is character range 'A'..'Z' ????? and what then??
>>
>>
>>Do I really have list all the values?
> 
> 
> Take a look at Ada.Strings.Maps and Strings.Maps.Constants. They
> provide sets of characters, operations on them and useful constant
> sets like Alphanumeric_Set etc. I think that
> 
> Whatsoever : constant Character_Set :=
>    Decimal_Digit_Set  or
>    To_Set (Character_Range'('A', 'Z')) or
>    To_Set ('�') or
>    To_Set ('�') or
>    To_Set ('�');
> 
> is what you are looking for.

I want to use the set/type like  this:
My_array : array[Valid_Characters] of something;
That excludes the character set, I guess.

-- 
Erlo
-----
Remove underscores from mail address.
The statements and opinions are mine and does not
neccesarily reflect those of my employers