Lines Matching refs:Ekind
127 elsif Ekind (Ent) = E_Constant
243 exit when Ekind (Ent) = E_Discriminant
283 pragma Assert (Ekind (Typ) = E_Discriminant);
294 elsif Ekind (Ent) = E_Discriminant
321 exit when Ekind (Ent) = E_Discriminant
327 pragma Assert (Ekind (Ent) = E_Discriminant);
486 if Ekind (E) = E_String_Literal_Subtype then
814 if Ekind (S) = E_Generic_Package
977 K : constant Entity_Kind := Ekind (T);
1016 and then Ekind (Ent) /= E_Subprogram_Type
1065 elsif Ekind (Btype) = E_Limited_Private_Type
1084 elsif Ekind (Scope (Etype (Btype))) = E_Generic_Package then
1123 elsif Ekind (Btype) = E_Limited_Private_Type
1202 elsif Ekind (Btype) = E_Limited_Private_Type
1221 elsif Ekind (Scope (Etype (Btype))) = E_Generic_Package then
1454 if Ekind (E) = E_Package_Body then
1645 if Ekind (Unit_Id) = E_Operator then