package Ack.Semantic.Analysis.Class_Names is

   procedure Analyse_Class_Name
     (Context       : Ack.Classes.Class_Entity;
      Class_Name    : Node_Id;
      Defining_Name : Boolean);

end Ack.Semantic.Analysis.Class_Names;
