Ада-95. Компилятор GNAT


Агрегаты для записей - часть 2


type Summary is record

Field_1 : Boolean; Field_2 : Float; Field_3 : Integer; Field_4 : Integer; end record;

Variable_1 : Summary := (True, 10.0, 1, 1); -- позиционная нотация Variable_2 : Summary := ( -- именованная нотация Field_4 => 1 Field_3 => 1, Field_2 => 10.0, Field_1 => True ); Variable_2 : Summary := ( -- смешанная нотация True, 10.0, Field_4 => 1, Field_3 => 1 );

-------------------------- использование символа '|' Variable_4 : Summary := ( True, 10.0, Field_3|Field_4 => 1 ); Variable_5 : Summary := ( Field_1 => True, Field_2 => 10.0, Field_3|Field_4 => 1 );

-------------------------- использование others Variable_6 : Summary := (True, 10.0, others =&gt 1); Variable_7 : Summary := ( Field_1 => True, Field_2 => 10.0, others => 1 );




- Начало -  - Назад -  - Вперед -