Re: null array constant in Ada 83

[Martin Krischik <krischik@users.sourceforge.net>]

Frank J. Lhota schrieb:
> Martin Krischik wrote:
>> Hi,
>>
>> maintaining old code is such a great fun. Anybody know what goes where
>> the 4 dots are (an appropriate N_Sel_List_Entry is declared).
>>
>>    subtype T_Sel_Entries is Integer range 0 ..
>> Selection_Types.Max_Selection_Results;
>>
>>    type T_Sel_List is array (T_Sel_Entries range <>) of T_Sel_List_Entry;
>>
>>    N_Sel_List : constant T_Sel_List (1 .. 0) := ....;
>>
>> Or is it just plain impossible in Ada 83.
>>
>> Regards
>>
>> Martin
> 
> If N_Sel_Entry_Value is a value of type N_Sel_List_Entry, then you could
> write
> 
>    N_Sel_List : constant T_Sel_List (1 .. 0) :=
>       (1 .. 0 => N_Sel_Entry_Value);

I see - I tried "other =>" - and that did not work at least not with Ada 83.

> The fact that you have to provide a component value that is never used
> is a well known annoyance.

I know. Even more interesting is creating a constant of a null record
(tied that in a prototype just recently). I found the syntax in the Ada
95 RM only to find out that Ada 83 does not know about it. But since it
was a prototype I did not bother looking into it.

Martin

-- 
mailto://krischik@users.sourceforge.net
Ada programming at: http://ada.krischik.com