9 lines
142 B
Ada
9 lines
142 B
Ada
with System.Storage_Pools;
|
|
|
|
package H2 is
|
|
|
|
type Storage_Pool_Pointer is
|
|
access all System.Storage_Pools.Root_Storage_Pool'Class;
|
|
|
|
end H2;
|