1 ------------------------------------------------------------------------------
3 -- GNAT COMPILER COMPONENTS --
5 -- U N C H E C K E D _ D E A L L O C A T I O N --
10 -- This specification is adapted from the Ada Reference Manual for use with --
11 -- GNAT. In accordance with the copyright of that document, you can freely --
12 -- copy and modify this specification, provided that if you redistribute a --
13 -- modified version, any changes that you have made are clearly indicated. --
15 ------------------------------------------------------------------------------
18 type Object
(<>) is limited private;
19 type Name
is access Object
;
21 procedure Unchecked_Deallocation
(X
: in out Name
);
22 pragma Import
(Intrinsic
, Unchecked_Deallocation
);