Lines Matching defs:Inline_Instance_Body
677 procedure Inline_Instance_Body subprogspec
4846 procedure Inline_Instance_Body subprogram
4851 Config_Attrs : constant Config_Switches_Type := Save_Config_Switches;
4853 Curr_Comp : constant Node_Id := Cunit (Current_Sem_Unit);
4854 Curr_Unit : constant Entity_Id := Cunit_Entity (Current_Sem_Unit);
4855 Gen_Comp : constant Entity_Id :=
4858 Scope_Stack_Depth : constant Pos :=
4861 Inner_Scopes : array (1 .. Scope_Stack_Depth) of Entity_Id;
4862 Instances : array (1 .. Scope_Stack_Depth) of Entity_Id;
4863 Use_Clauses : array (1 .. Scope_Stack_Depth) of Node_Id;
4865 Curr_Scope : Entity_Id := Empty;
4866 List : Elist_Id := No_Elist; -- init to avoid warning
4867 N_Instances : Nat := 0;
4868 Num_Inner : Nat := 0;
4869 Num_Scopes : Nat := 0;
4870 Removed : Boolean := False;
4871 S : Entity_Id;
4872 Vis : Boolean;