Справочник по Ada 2012
13.7.2 Пакет System.Address_To_Access_Conversions
Статическая семантика
Существует следующий определяемый языком обобщенный пакет библиотеки:
generic
type Объект(<>) is limited private;
package System.Address_To_Access_Conversions is
pragma Preelaborate(Address_To_Access_Conversions);
type Объект(<>) is limited private;
package System.Address_To_Access_Conversions is
pragma Preelaborate(Address_To_Access_Conversions);
type Указатель_на_объект is access all Объект;
function To_Pointer(Значение : Address) return Указатель_на_объект
with Convention => Intrinsic;
function To_Address(Значение : Указатель_на_объект) return Address
with Convention => Intrinsic;
function To_Pointer(Значение : Address) return Указатель_на_объект
with Convention => Intrinsic;
function To_Address(Значение : Указатель_на_объект) return Address
with Convention => Intrinsic;
end System.Address_To_Access_Conversions;
Подпрограммы To_Pointer и To_Address преобразуют значения между типами Object_Pointer и Address. To_Pointer(X'Address) равно X'Unchecked_Access для любого X, допускающего Unchecked_Access. To_Pointer(Null_Address) возвращает null. Для других адресов поведение не определено. To_Address(null) возвращает Null_Address. To_Address(Y), где Y /= null, возвращает Y.all'Address.
Разрешения реализации
Реализация может накладывать ограничения на экземпляры Address_To_Access_Conversions.
