--  { dg-do compile }

package body Expr_Func6 is

   procedure Dummy is null;

end Expr_Func6;