1 2 3 4 5 6 7
with System.Storage_Elements; use System.Storage_Elements; package Controlled7 is procedure Proc (Offset : Storage_Offset); end Controlled7;