gcc/testsuite/gnat.dg/elab7_pkg1.adb

with Elab7_Pkg2;

package body Elab7_Pkg1 is
   procedure A is
   begin
      Elab7_Pkg2.A;
   end A;
end Elab7_Pkg1;