1--  { dg-do compile }
2
3package body Renaming12 is
4
5  procedure Dummy is null;
6
7end Renaming12;
8