with System.Storage_Pools; package H2 is type Storage_Pool_Pointer is access all System.Storage_Pools.Root_Storage_Pool'Class; end H2;