Lines Matching refs:Tag_Component
239 and then DTC_Entity (Subp) /= Tag_Component (Typ)
341 New_Reference_To (Tag_Component (Typ), Loc)),
348 New_Reference_To (Tag_Component (Typ), Loc))),
485 New_Reference_To (Tag_Component (Typ), Loc)),
493 New_Reference_To (Tag_Component (Typ), Loc))),
624 DT_Entry_Count (Tag_Component (Typ)))));
786 DT_Entry_Count (Tag_Component (Etype (Typ)))))));
1038 The_Tag : constant Entity_Id := Tag_Component (Typ);
1051 and then DT_Entry_Count (Tag_Component (Parent_Typ)) /= No_Uint
1053 Parent_EC := UI_To_Int (DT_Entry_Count (Tag_Component (Parent_Typ)));
1258 DT_Entry_Count (Tag_Component (Parent_Typ)));