Re: I need a little help - it's been a long time - with enumeration type and for use representation

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

Dmitry A. Kazakov wrote:
> On Fri, 13 Nov 2009 11:48:12 -0700, Jeffrey R. Carter wrote:
> 
>> Dmitry A. Kazakov wrote:
>>> You parse "0x", then you do a hexadecimal number following it, then you
>>> pass that number (x) to:
>>>
>>>    Spell_School_Type'Val (x)
>> This doesn't work with a non-default representation. 'Val reverses 'Pos, and 
>> 'Pos gives sequential values starting with zero, regardless of the representation.
> 
> But it works with the modular type proposed. An enumeration type was not
> meant. For enumeration types one should parse names, rather than arbitrary
> bit patterns.

I see. I cannot imagine using 'Val in this case. Since you start with a String 
containing the hexadecimal image of a value, I'd simply do

Numeric_Type_Name'Value ("16#" & Source (Start .. Stop) & '#');

-- 
Jeff Carter
"Son of a window-dresser."
Monty Python & the Holy Grail
12