Home
last modified time | relevance | path

Searched refs:Atyp (Results 101 – 125 of 235) sorted by relevance

12345678910

/dports/devel/avr-gcc/gcc-10.2.0/gcc/ada/
H A Dsem_eval.adb2631 Atyp : Entity_Id;
2644 Atyp := Etype (Arr);
2646 if Is_Access_Type (Atyp) then
2647 Atyp := Designated_Type (Atyp);
2654 if Is_Array_Type (Atyp) and then Atyp /= Any_Composite then
2655 if Ekind (Atyp) = E_String_Literal_Subtype then
2656 Lbd := String_Literal_Low_Bound (Atyp);
2658 Lbd := Type_Low_Bound (Etype (First_Index (Atyp)));
2664 and then Is_Discrete_Type (Component_Type (Atyp))
2705 Set_Etype (Elm, Component_Type (Atyp));
H A Dexp_unst.adb2205 Atyp : Entity_Id; variable
2225 Atyp := Etype (UPJ.Ref);
2227 if Ekind (Atyp) /= E_Record_Subtype then
2228 Atyp := Get_Actual_Subtype (UPJ.Ref);
2332 Prefix => New_Occurrence_Of (Atyp, Loc),
/dports/lang/gcc10/gcc-10.3.0/gcc/ada/
H A Dsem_eval.adb2631 Atyp : Entity_Id;
2644 Atyp := Etype (Arr);
2646 if Is_Access_Type (Atyp) then
2647 Atyp := Designated_Type (Atyp);
2654 if Is_Array_Type (Atyp) and then Atyp /= Any_Composite then
2655 if Ekind (Atyp) = E_String_Literal_Subtype then
2656 Lbd := String_Literal_Low_Bound (Atyp);
2658 Lbd := Type_Low_Bound (Etype (First_Index (Atyp)));
2664 and then Is_Discrete_Type (Component_Type (Atyp))
2705 Set_Etype (Elm, Component_Type (Atyp));
H A Dexp_unst.adb2205 Atyp : Entity_Id; variable
2225 Atyp := Etype (UPJ.Ref);
2227 if Ekind (Atyp) /= E_Record_Subtype then
2228 Atyp := Get_Actual_Subtype (UPJ.Ref);
2332 Prefix => New_Occurrence_Of (Atyp, Loc),
/dports/lang/gcc8/gcc-8.5.0/gcc/ada/
H A Dsem_eval.adb2570 Atyp : Entity_Id;
2583 Atyp := Etype (Arr);
2585 if Is_Access_Type (Atyp) then
2586 Atyp := Designated_Type (Atyp);
2593 if Is_Array_Type (Atyp) and then Atyp /= Any_Composite then
2594 if Ekind (Atyp) = E_String_Literal_Subtype then
2595 Lbd := String_Literal_Low_Bound (Atyp);
2597 Lbd := Type_Low_Bound (Etype (First_Index (Atyp)));
2603 and then Is_Discrete_Type (Component_Type (Atyp))
2644 Set_Etype (Elm, Component_Type (Atyp));
/dports/lang/gcc9-aux/gcc-9.1.0/gcc/ada/
H A Dsem_eval.adb2594 Atyp : Entity_Id;
2607 Atyp := Etype (Arr);
2609 if Is_Access_Type (Atyp) then
2610 Atyp := Designated_Type (Atyp);
2617 if Is_Array_Type (Atyp) and then Atyp /= Any_Composite then
2618 if Ekind (Atyp) = E_String_Literal_Subtype then
2619 Lbd := String_Literal_Low_Bound (Atyp);
2621 Lbd := Type_Low_Bound (Etype (First_Index (Atyp)));
2627 and then Is_Discrete_Type (Component_Type (Atyp))
2668 Set_Etype (Elm, Component_Type (Atyp));
/dports/lang/gcc9-devel/gcc-9-20211007/gcc/ada/
H A Dsem_eval.adb2594 Atyp : Entity_Id;
2607 Atyp := Etype (Arr);
2609 if Is_Access_Type (Atyp) then
2610 Atyp := Designated_Type (Atyp);
2617 if Is_Array_Type (Atyp) and then Atyp /= Any_Composite then
2618 if Ekind (Atyp) = E_String_Literal_Subtype then
2619 Lbd := String_Literal_Low_Bound (Atyp);
2621 Lbd := Type_Low_Bound (Etype (First_Index (Atyp)));
2627 and then Is_Discrete_Type (Component_Type (Atyp))
2668 Set_Etype (Elm, Component_Type (Atyp));
/dports/lang/gcc48/gcc-4.8.5/gcc/ada/
H A Dsem_ch13.adb5857 if Present (Atyp) then
5858 Add_Call (Atyp);
9584 procedure Check_Array_Type (Atyp : Entity_Id);
9606 procedure Check_Array_Type (Atyp : Entity_Id) is
9612 if not Has_Component_Size_Clause (Atyp)
9613 and then not Has_Alignment_Clause (Atyp)
9614 and then not Is_Packed (Atyp)
9621 if not Known_Component_Size (Atyp)
9630 if Has_Component_Size_Clause (Atyp) then
9641 if Is_Packed (Atyp) then
[all …]
/dports/devel/mingw32-gcc/gcc-4.8.1/gcc/ada/
H A Dsem_ch13.adb5857 if Present (Atyp) then
5858 Add_Call (Atyp);
9584 procedure Check_Array_Type (Atyp : Entity_Id);
9606 procedure Check_Array_Type (Atyp : Entity_Id) is
9612 if not Has_Component_Size_Clause (Atyp)
9613 and then not Has_Alignment_Clause (Atyp)
9614 and then not Is_Packed (Atyp)
9621 if not Known_Component_Size (Atyp)
9630 if Has_Component_Size_Clause (Atyp) then
9641 if Is_Packed (Atyp) then
[all …]
/dports/lang/gcc11-devel/gcc-11-20211009/gcc/ada/
H A Dexp_unst.adb2222 Atyp : Entity_Id; variable
2242 Atyp := Etype (UPJ.Ref);
2244 if Ekind (Atyp) /= E_Record_Subtype then
2245 Atyp := Get_Actual_Subtype (UPJ.Ref);
2349 Prefix => New_Occurrence_Of (Atyp, Loc),
H A Dsem_eval.adb2726 Atyp : Entity_Id;
2739 Atyp := Etype (Arr);
2741 if Is_Access_Type (Atyp) then
2742 Atyp := Designated_Type (Atyp);
2749 if Is_Array_Type (Atyp) and then Atyp /= Any_Composite then
2750 if Ekind (Atyp) = E_String_Literal_Subtype then
2751 Lbd := String_Literal_Low_Bound (Atyp);
2753 Lbd := Type_Low_Bound (Etype (First_Index (Atyp)));
2759 and then Is_Discrete_Type (Component_Type (Atyp))
2800 Set_Etype (Elm, Component_Type (Atyp));
/dports/lang/gcc10-devel/gcc-10-20211008/gcc/ada/
H A Dexp_unst.adb2205 Atyp : Entity_Id; variable
2225 Atyp := Etype (UPJ.Ref);
2227 if Ekind (Atyp) /= E_Record_Subtype then
2228 Atyp := Get_Actual_Subtype (UPJ.Ref);
2332 Prefix => New_Occurrence_Of (Atyp, Loc),
/dports/lang/gcc12-devel/gcc-12-20211205/gcc/ada/
H A Dexp_unst.adb2233 Atyp : Entity_Id; variable
2253 Atyp := Etype (UPJ.Ref);
2255 if Ekind (Atyp) /= E_Record_Subtype then
2256 Atyp := Get_Actual_Subtype (UPJ.Ref);
2360 Prefix => New_Occurrence_Of (Atyp, Loc),
H A Dsem_eval.adb2742 Atyp : Entity_Id;
2755 Atyp := Etype (Arr);
2757 if Is_Access_Type (Atyp) then
2758 Atyp := Designated_Type (Atyp);
2765 if Is_Array_Type (Atyp) and then Atyp /= Any_Composite then
2766 if Ekind (Atyp) = E_String_Literal_Subtype then
2767 Lbd := String_Literal_Low_Bound (Atyp);
2769 Lbd := Type_Low_Bound (Etype (First_Index (Atyp)));
2775 and then Is_Discrete_Type (Component_Type (Atyp))
2816 Set_Etype (Elm, Component_Type (Atyp));
/dports/misc/cxx_atomics_pic/gcc-11.2.0/gcc/ada/
H A Dexp_unst.adb2222 Atyp : Entity_Id; variable
2242 Atyp := Etype (UPJ.Ref);
2244 if Ekind (Atyp) /= E_Record_Subtype then
2245 Atyp := Get_Actual_Subtype (UPJ.Ref);
2349 Prefix => New_Occurrence_Of (Atyp, Loc),
H A Dsem_eval.adb2726 Atyp : Entity_Id;
2739 Atyp := Etype (Arr);
2741 if Is_Access_Type (Atyp) then
2742 Atyp := Designated_Type (Atyp);
2749 if Is_Array_Type (Atyp) and then Atyp /= Any_Composite then
2750 if Ekind (Atyp) = E_String_Literal_Subtype then
2751 Lbd := String_Literal_Low_Bound (Atyp);
2753 Lbd := Type_Low_Bound (Etype (First_Index (Atyp)));
2759 and then Is_Discrete_Type (Component_Type (Atyp))
2800 Set_Etype (Elm, Component_Type (Atyp));
/dports/lang/gcc11/gcc-11.2.0/gcc/ada/
H A Dexp_unst.adb2222 Atyp : Entity_Id; variable
2242 Atyp := Etype (UPJ.Ref);
2244 if Ekind (Atyp) /= E_Record_Subtype then
2245 Atyp := Get_Actual_Subtype (UPJ.Ref);
2349 Prefix => New_Occurrence_Of (Atyp, Loc),
H A Dsem_eval.adb2726 Atyp : Entity_Id;
2739 Atyp := Etype (Arr);
2741 if Is_Access_Type (Atyp) then
2742 Atyp := Designated_Type (Atyp);
2749 if Is_Array_Type (Atyp) and then Atyp /= Any_Composite then
2750 if Ekind (Atyp) = E_String_Literal_Subtype then
2751 Lbd := String_Literal_Low_Bound (Atyp);
2753 Lbd := Type_Low_Bound (Etype (First_Index (Atyp)));
2759 and then Is_Discrete_Type (Component_Type (Atyp))
2800 Set_Etype (Elm, Component_Type (Atyp));
/dports/lang/gcc6-aux/gcc-6-20180516/gcc/ada/
H A Dsem_ch13.adb8671 if Present (Atyp) then
8672 Add_Call (Atyp);
13167 procedure Check_Array_Type (Atyp : Entity_Id);
13195 if not Has_Component_Size_Clause (Atyp)
13196 and then not Has_Alignment_Clause (Atyp)
13197 and then not Is_Packed (Atyp)
13206 if Known_Component_Size (Atyp)
13207 and then Component_Size (Atyp) >= 64
13208 and then Known_Alignment (Atyp)
13217 if not Known_Component_Size (Atyp)
[all …]
/dports/lang/gnat_util/gcc-6-20180516/gcc/ada/
H A Dsem_ch13.adb8671 if Present (Atyp) then
8672 Add_Call (Atyp);
13167 procedure Check_Array_Type (Atyp : Entity_Id);
13195 if not Has_Component_Size_Clause (Atyp)
13196 and then not Has_Alignment_Clause (Atyp)
13197 and then not Is_Packed (Atyp)
13206 if Known_Component_Size (Atyp)
13207 and then Component_Size (Atyp) >= 64
13208 and then Known_Alignment (Atyp)
13217 if not Known_Component_Size (Atyp)
[all …]
/dports/editors/fpc-ide/fpc-3.2.2/compiler/
H A Dogbase.pas266 constructor CreateSymbol(ADataOffset:TObjSectionOfs;s:TObjSymbol;Atyp:TObjRelocationType);
267 … constructor CreateSection(ADataOffset:TObjSectionOfs;aobjsec:TObjSection;Atyp:TObjRelocationType);
268 … constructor CreateGroup(ADataOffset:TObjSectionOfs;grp:TObjSectionGroup;Atyp:TObjRelocationType);
842 …constructor TObjRelocation.CreateSymbol(ADataOffset:TObjSectionOfs;s:TObjSymbol;Atyp:TObjRelocatio…
851 ftype:=ord(Atyp);
855 …constructor TObjRelocation.CreateSection(ADataOffset:TObjSectionOfs;aobjsec:TObjSection;Atyp:TObjR…
864 ftype:=ord(Atyp);
868 …constructor TObjRelocation.CreateGroup(ADataOffset:TObjSectionOfs;grp:TObjSectionGroup;Atyp:TObjRe…
877 ftype:=ord(Atyp);
/dports/lang/fpc/fpc-3.2.2/compiler/
H A Dogbase.pas266 constructor CreateSymbol(ADataOffset:TObjSectionOfs;s:TObjSymbol;Atyp:TObjRelocationType);
267 … constructor CreateSection(ADataOffset:TObjSectionOfs;aobjsec:TObjSection;Atyp:TObjRelocationType);
268 … constructor CreateGroup(ADataOffset:TObjSectionOfs;grp:TObjSectionGroup;Atyp:TObjRelocationType);
842 …constructor TObjRelocation.CreateSymbol(ADataOffset:TObjSectionOfs;s:TObjSymbol;Atyp:TObjRelocatio…
851 ftype:=ord(Atyp);
855 …constructor TObjRelocation.CreateSection(ADataOffset:TObjSectionOfs;aobjsec:TObjSection;Atyp:TObjR…
864 ftype:=ord(Atyp);
868 …constructor TObjRelocation.CreateGroup(ADataOffset:TObjSectionOfs;grp:TObjSectionGroup;Atyp:TObjRe…
877 ftype:=ord(Atyp);
/dports/lang/fpc-source/fpc-3.2.2/compiler/
H A Dogbase.pas266 constructor CreateSymbol(ADataOffset:TObjSectionOfs;s:TObjSymbol;Atyp:TObjRelocationType);
267 … constructor CreateSection(ADataOffset:TObjSectionOfs;aobjsec:TObjSection;Atyp:TObjRelocationType);
268 … constructor CreateGroup(ADataOffset:TObjSectionOfs;grp:TObjSectionGroup;Atyp:TObjRelocationType);
842 …constructor TObjRelocation.CreateSymbol(ADataOffset:TObjSectionOfs;s:TObjSymbol;Atyp:TObjRelocatio…
851 ftype:=ord(Atyp);
855 …constructor TObjRelocation.CreateSection(ADataOffset:TObjSectionOfs;aobjsec:TObjSection;Atyp:TObjR…
864 ftype:=ord(Atyp);
868 …constructor TObjRelocation.CreateGroup(ADataOffset:TObjSectionOfs;grp:TObjSectionGroup;Atyp:TObjRe…
877 ftype:=ord(Atyp);
/dports/devel/arm-none-eabi-gcc492/gcc-4.9.2/gcc/ada/
H A Dsem_ch13.adb6754 if Present (Atyp) then
6755 Add_Call (Atyp);
11246 procedure Check_Array_Type (Atyp : Entity_Id);
11268 procedure Check_Array_Type (Atyp : Entity_Id) is
11274 if not Has_Component_Size_Clause (Atyp)
11275 and then not Has_Alignment_Clause (Atyp)
11276 and then not Is_Packed (Atyp)
11283 if not Known_Component_Size (Atyp)
11292 if Has_Component_Size_Clause (Atyp) then
11303 if Is_Packed (Atyp) then
[all …]
/dports/devel/zpu-gcc/zpu-toolchain-1.0/toolchain/gcc/gcc/ada/
H A Dsem_util.adb2370 Atyp : Entity_Id; variable
2428 Atyp := Defining_Identifier (Decl);
2432 if Atyp /= Typ then
2438 Set_Is_Itype (Atyp);
2440 Set_Associated_Node_For_Itype (Atyp, N);
2441 Set_Has_Delayed_Freeze (Atyp, False);
2448 Freeze_Itype (Atyp, N);
2449 return Atyp;

12345678910