Lines Matching refs:Xtyp

840          Xtyp : Entity_Id;  variable
849             Xtyp := Etype (Prefix (N));
854             if No (Xtyp) then
860             if Is_Access_Type (Xtyp) then
861                Xtyp := Designated_Type (Xtyp);
868             if not Is_Array_Type (Xtyp) then
874             if not Is_Constrained (Xtyp) then
878             if Ekind (Xtyp) = E_String_Literal_Subtype then
880                   return String_Literal_Low_Bound (Xtyp);
884                       Intval => Intval (String_Literal_Low_Bound (Xtyp)) +
885                                           String_Literal_Length (Xtyp));
891             Indx := First_Index (Xtyp);
901             Xtyp := Etype (Indx);
904                return Type_Low_Bound (Xtyp);
906                return Type_High_Bound (Xtyp);