1package profile_warning_p is
2   generic
3   procedure Proc;
4end;
5