Ada multiple elaboration of non-generic package

README.md

Response to comment on this question

elab.adb

with Ada.Text_IO; use Ada.Text_IO;
procedure Elab is
begin
    for I in 1 .. 3 loop
        declare
            package Pkg is
            end Pkg;

            package body Pkg is
            begin
                Put_Line("Elaborating Pkg, I = " & Integer'Image(I));
            end Pkg;
        begin
            null;
        end;
    end loop;
end Elab;