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