procedure Test_61 is
procedure p1;
generic
package pak1 is
procedure p2 renames p1;
end pak1;
package new_pak1 is new pak1;
procedure p1 renames new_pak1.p2; --ERROR: circular renames
begin
p1;
end Test_61;
found 247018 4.3.2-2 found 247019 4.3.2-2 thanks
found 247019 4.4.1-1 thanks