package addr1 is
   pragma Elaborate_Body;
end;