package Bug_Elaboration_Code is

   pragma Elaborate_Body;

   I : Integer;
   J : Integer;

end Bug_Elaboration_Code;