Lines Matching defs:Inline_Instance_Body
720 procedure Inline_Instance_Body subprogspec
4997 procedure Inline_Instance_Body subprogram
5002 Config_Attrs : constant Config_Switches_Type := Save_Config_Switches;
5004 Curr_Comp : constant Node_Id := Cunit (Current_Sem_Unit);
5005 Curr_Unit : constant Entity_Id := Cunit_Entity (Current_Sem_Unit);
5006 Gen_Comp : constant Entity_Id :=
5009 Scope_Stack_Depth : constant Pos :=
5012 Inner_Scopes : array (1 .. Scope_Stack_Depth) of Entity_Id;
5013 Instances : array (1 .. Scope_Stack_Depth) of Entity_Id;
5014 Use_Clauses : array (1 .. Scope_Stack_Depth) of Node_Id;
5016 Curr_Scope : Entity_Id := Empty;
5017 List : Elist_Id := No_Elist; -- init to avoid warning
5018 N_Instances : Nat := 0;
5019 Num_Inner : Nat := 0;
5020 Num_Scopes : Nat := 0;
5021 Removed : Boolean := False;
5022 S : Entity_Id;
5023 Vis : Boolean;