Изменение представления

Для данного типа и данного аспекта его представления допустимо не более одного спецификатора представления. Поэтому если желательно другое представление, то необходимо описать второй тип, производный от первого, и для него специфицировать другое представление.

Пример:

PACKED_DESCRIPTOR and DESCRIPTOR -- это два различных -— типа с одинаковыми характеристиками, но различным представлением

type DESCRIPTOR is record

-- компоненты DESCRIPTOR end record;

type PACKED_DESCRIPTOR is new DESCRIPTOR;

for PACKED_DESCRIPTOR use

record

-— спецификаторы компонент для всех или некоторых компонент end record;

Изменение представления может быть теперь достигнуто присваиванием с явным преобразованием типа:

D : DESCRIPTOR; Р : PACKED_DESCRIPTOR;

Р := PACKED_DESCRIPTOR(D); —- упаковка D D := DESCRIPTOR(P); -— распаковка Р

Содержание раздела

---