/dports/lang/gcc12-devel/gcc-12-20211205/gcc/ada/ |
H A D | exp_intr.adb | 867 Desig_Typ : constant Entity_Id := constant 959 if Is_Tagged_Type (Desig_Typ) then 976 Set_Etype (Obj_Ref, Desig_Typ); 1063 if Is_Task_Type (Desig_Typ) then 1070 elsif Has_Task (Desig_Typ) then 1071 if Is_Array_Type (Desig_Typ) then 1074 elsif Is_Record_Type (Desig_Typ) then 1087 if Is_Array_Type (Desig_Typ) then 1170 if Is_Class_Wide_Type (Desig_Typ) 1172 (Is_Packed_Array (Desig_Typ) [all …]
|
/dports/devel/aarch64-none-elf-gcc/gcc-8.4.0/gcc/ada/ |
H A D | exp_intr.adb | 927 Desig_Typ : constant Entity_Id := constant 997 if Is_Tagged_Type (Desig_Typ) then 1014 Set_Etype (Obj_Ref, Desig_Typ); 1101 if Is_Task_Type (Desig_Typ) then 1108 elsif Has_Task (Desig_Typ) then 1109 if Is_Array_Type (Desig_Typ) then 1125 if Is_Array_Type (Desig_Typ) then 1208 if Is_Class_Wide_Type (Desig_Typ) 1210 (Is_Array_Type (Desig_Typ) 1212 and then Is_Packed (Desig_Typ)) [all …]
|
H A D | exp_ch7.adb | 544 (Desig_Typ : Entity_Id; 553 (Desig_Typ : Entity_Id; 563 (Desig_Typ : Entity_Id; 671 (Desig_Typ : Entity_Id; 705 Desig_Typ : Entity_Id; variable 743 Desig_Typ := Priv_View; 1229 elsif Is_Frozen (Desig_Typ) 8094 Desig_Typ : Entity_Id; variable 8143 Desig_Typ := Typ; 8233 Typ => Desig_Typ); [all …]
|
/dports/devel/arm-none-eabi-gcc/gcc-8.4.0/gcc/ada/ |
H A D | exp_intr.adb | 927 Desig_Typ : constant Entity_Id := constant 997 if Is_Tagged_Type (Desig_Typ) then 1014 Set_Etype (Obj_Ref, Desig_Typ); 1101 if Is_Task_Type (Desig_Typ) then 1108 elsif Has_Task (Desig_Typ) then 1109 if Is_Array_Type (Desig_Typ) then 1125 if Is_Array_Type (Desig_Typ) then 1208 if Is_Class_Wide_Type (Desig_Typ) 1210 (Is_Array_Type (Desig_Typ) 1212 and then Is_Packed (Desig_Typ)) [all …]
|
H A D | exp_ch7.adb | 544 (Desig_Typ : Entity_Id; 553 (Desig_Typ : Entity_Id; 563 (Desig_Typ : Entity_Id; 671 (Desig_Typ : Entity_Id; 705 Desig_Typ : Entity_Id; variable 743 Desig_Typ := Priv_View; 1229 elsif Is_Frozen (Desig_Typ) 8094 Desig_Typ : Entity_Id; variable 8143 Desig_Typ := Typ; 8233 Typ => Desig_Typ); [all …]
|
/dports/devel/avr-gcc/gcc-10.2.0/gcc/ada/ |
H A D | exp_intr.adb | 930 Desig_Typ : constant Entity_Id := constant 1022 if Is_Tagged_Type (Desig_Typ) then 1039 Set_Etype (Obj_Ref, Desig_Typ); 1126 if Is_Task_Type (Desig_Typ) then 1133 elsif Has_Task (Desig_Typ) then 1134 if Is_Array_Type (Desig_Typ) then 1150 if Is_Array_Type (Desig_Typ) then 1233 if Is_Class_Wide_Type (Desig_Typ) 1235 (Is_Array_Type (Desig_Typ) 1237 and then Is_Packed (Desig_Typ)) [all …]
|
H A D | exp_ch7.adb | 604 (Desig_Typ : Entity_Id; 613 (Desig_Typ : Entity_Id; 623 (Desig_Typ : Entity_Id; 731 (Desig_Typ : Entity_Id; 765 Desig_Typ : Entity_Id; variable 803 Desig_Typ := Priv_View; 1289 elsif Is_Frozen (Desig_Typ) 8540 Desig_Typ : Entity_Id; variable 8589 Desig_Typ := Typ; 8679 Typ => Desig_Typ); [all …]
|
/dports/devel/riscv32-unknown-elf-gcc/gcc-8.4.0/gcc/ada/ |
H A D | exp_intr.adb | 927 Desig_Typ : constant Entity_Id := constant 997 if Is_Tagged_Type (Desig_Typ) then 1014 Set_Etype (Obj_Ref, Desig_Typ); 1101 if Is_Task_Type (Desig_Typ) then 1108 elsif Has_Task (Desig_Typ) then 1109 if Is_Array_Type (Desig_Typ) then 1125 if Is_Array_Type (Desig_Typ) then 1208 if Is_Class_Wide_Type (Desig_Typ) 1210 (Is_Array_Type (Desig_Typ) 1212 and then Is_Packed (Desig_Typ)) [all …]
|
H A D | exp_ch7.adb | 544 (Desig_Typ : Entity_Id; 553 (Desig_Typ : Entity_Id; 563 (Desig_Typ : Entity_Id; 671 (Desig_Typ : Entity_Id; 705 Desig_Typ : Entity_Id; variable 743 Desig_Typ := Priv_View; 1229 elsif Is_Frozen (Desig_Typ) 8094 Desig_Typ : Entity_Id; variable 8143 Desig_Typ := Typ; 8233 Typ => Desig_Typ); [all …]
|
/dports/devel/riscv64-gcc/gcc-8.3.0/gcc/ada/ |
H A D | exp_intr.adb | 927 Desig_Typ : constant Entity_Id := constant 997 if Is_Tagged_Type (Desig_Typ) then 1014 Set_Etype (Obj_Ref, Desig_Typ); 1101 if Is_Task_Type (Desig_Typ) then 1108 elsif Has_Task (Desig_Typ) then 1109 if Is_Array_Type (Desig_Typ) then 1125 if Is_Array_Type (Desig_Typ) then 1208 if Is_Class_Wide_Type (Desig_Typ) 1210 (Is_Array_Type (Desig_Typ) 1212 and then Is_Packed (Desig_Typ)) [all …]
|
H A D | exp_ch7.adb | 544 (Desig_Typ : Entity_Id; 553 (Desig_Typ : Entity_Id; 563 (Desig_Typ : Entity_Id; 671 (Desig_Typ : Entity_Id; 705 Desig_Typ : Entity_Id; variable 743 Desig_Typ := Priv_View; 1229 elsif Is_Frozen (Desig_Typ) 8094 Desig_Typ : Entity_Id; variable 8143 Desig_Typ := Typ; 8233 Typ => Desig_Typ); [all …]
|
/dports/lang/gcc10/gcc-10.3.0/gcc/ada/ |
H A D | exp_intr.adb | 930 Desig_Typ : constant Entity_Id := constant 1022 if Is_Tagged_Type (Desig_Typ) then 1039 Set_Etype (Obj_Ref, Desig_Typ); 1126 if Is_Task_Type (Desig_Typ) then 1133 elsif Has_Task (Desig_Typ) then 1134 if Is_Array_Type (Desig_Typ) then 1150 if Is_Array_Type (Desig_Typ) then 1233 if Is_Class_Wide_Type (Desig_Typ) 1235 (Is_Array_Type (Desig_Typ) 1237 and then Is_Packed (Desig_Typ)) [all …]
|
/dports/lang/gcc8/gcc-8.5.0/gcc/ada/ |
H A D | exp_intr.adb | 927 Desig_Typ : constant Entity_Id := constant 997 if Is_Tagged_Type (Desig_Typ) then 1014 Set_Etype (Obj_Ref, Desig_Typ); 1101 if Is_Task_Type (Desig_Typ) then 1108 elsif Has_Task (Desig_Typ) then 1109 if Is_Array_Type (Desig_Typ) then 1125 if Is_Array_Type (Desig_Typ) then 1208 if Is_Class_Wide_Type (Desig_Typ) 1210 (Is_Array_Type (Desig_Typ) 1212 and then Is_Packed (Desig_Typ)) [all …]
|
H A D | exp_ch7.adb | 544 (Desig_Typ : Entity_Id; 553 (Desig_Typ : Entity_Id; 563 (Desig_Typ : Entity_Id; 671 (Desig_Typ : Entity_Id; 705 Desig_Typ : Entity_Id; variable 743 Desig_Typ := Priv_View; 1229 elsif Is_Frozen (Desig_Typ) 8094 Desig_Typ : Entity_Id; variable 8143 Desig_Typ := Typ; 8233 Typ => Desig_Typ); [all …]
|
/dports/devel/riscv64-none-elf-gcc/gcc-8.4.0/gcc/ada/ |
H A D | exp_intr.adb | 927 Desig_Typ : constant Entity_Id := constant 997 if Is_Tagged_Type (Desig_Typ) then 1014 Set_Etype (Obj_Ref, Desig_Typ); 1101 if Is_Task_Type (Desig_Typ) then 1108 elsif Has_Task (Desig_Typ) then 1109 if Is_Array_Type (Desig_Typ) then 1125 if Is_Array_Type (Desig_Typ) then 1208 if Is_Class_Wide_Type (Desig_Typ) 1210 (Is_Array_Type (Desig_Typ) 1212 and then Is_Packed (Desig_Typ)) [all …]
|
H A D | exp_ch7.adb | 544 (Desig_Typ : Entity_Id; 553 (Desig_Typ : Entity_Id; 563 (Desig_Typ : Entity_Id; 671 (Desig_Typ : Entity_Id; 705 Desig_Typ : Entity_Id; variable 743 Desig_Typ := Priv_View; 1229 elsif Is_Frozen (Desig_Typ) 8094 Desig_Typ : Entity_Id; variable 8143 Desig_Typ := Typ; 8233 Typ => Desig_Typ); [all …]
|
/dports/lang/gcc9/gcc-9.4.0/gcc/ada/ |
H A D | exp_intr.adb | 930 Desig_Typ : constant Entity_Id := constant 1000 if Is_Tagged_Type (Desig_Typ) then 1017 Set_Etype (Obj_Ref, Desig_Typ); 1104 if Is_Task_Type (Desig_Typ) then 1111 elsif Has_Task (Desig_Typ) then 1112 if Is_Array_Type (Desig_Typ) then 1128 if Is_Array_Type (Desig_Typ) then 1211 if Is_Class_Wide_Type (Desig_Typ) 1213 (Is_Array_Type (Desig_Typ) 1215 and then Is_Packed (Desig_Typ)) [all …]
|
/dports/lang/gcc9-aux/gcc-9.1.0/gcc/ada/ |
H A D | exp_intr.adb | 930 Desig_Typ : constant Entity_Id := constant 1000 if Is_Tagged_Type (Desig_Typ) then 1017 Set_Etype (Obj_Ref, Desig_Typ); 1104 if Is_Task_Type (Desig_Typ) then 1111 elsif Has_Task (Desig_Typ) then 1112 if Is_Array_Type (Desig_Typ) then 1128 if Is_Array_Type (Desig_Typ) then 1211 if Is_Class_Wide_Type (Desig_Typ) 1213 (Is_Array_Type (Desig_Typ) 1215 and then Is_Packed (Desig_Typ)) [all …]
|
/dports/lang/gcc10-devel/gcc-10-20211008/gcc/ada/ |
H A D | exp_intr.adb | 930 Desig_Typ : constant Entity_Id := constant 1022 if Is_Tagged_Type (Desig_Typ) then 1039 Set_Etype (Obj_Ref, Desig_Typ); 1126 if Is_Task_Type (Desig_Typ) then 1133 elsif Has_Task (Desig_Typ) then 1134 if Is_Array_Type (Desig_Typ) then 1150 if Is_Array_Type (Desig_Typ) then 1233 if Is_Class_Wide_Type (Desig_Typ) 1235 (Is_Array_Type (Desig_Typ) 1237 and then Is_Packed (Desig_Typ)) [all …]
|
/dports/lang/gcc9-devel/gcc-9-20211007/gcc/ada/ |
H A D | exp_intr.adb | 930 Desig_Typ : constant Entity_Id := constant 1000 if Is_Tagged_Type (Desig_Typ) then 1017 Set_Etype (Obj_Ref, Desig_Typ); 1104 if Is_Task_Type (Desig_Typ) then 1111 elsif Has_Task (Desig_Typ) then 1112 if Is_Array_Type (Desig_Typ) then 1128 if Is_Array_Type (Desig_Typ) then 1211 if Is_Class_Wide_Type (Desig_Typ) 1213 (Is_Array_Type (Desig_Typ) 1215 and then Is_Packed (Desig_Typ)) [all …]
|
/dports/lang/gcc11-devel/gcc-11-20211009/gcc/ada/ |
H A D | exp_intr.adb | 921 Desig_Typ : constant Entity_Id := constant 1013 if Is_Tagged_Type (Desig_Typ) then 1030 Set_Etype (Obj_Ref, Desig_Typ); 1117 if Is_Task_Type (Desig_Typ) then 1124 elsif Has_Task (Desig_Typ) then 1125 if Is_Array_Type (Desig_Typ) then 1128 elsif Is_Record_Type (Desig_Typ) then 1141 if Is_Array_Type (Desig_Typ) then 1224 if Is_Class_Wide_Type (Desig_Typ) 1226 (Is_Packed_Array (Desig_Typ) [all …]
|
/dports/misc/cxx_atomics_pic/gcc-11.2.0/gcc/ada/ |
H A D | exp_intr.adb | 921 Desig_Typ : constant Entity_Id := constant 1013 if Is_Tagged_Type (Desig_Typ) then 1030 Set_Etype (Obj_Ref, Desig_Typ); 1117 if Is_Task_Type (Desig_Typ) then 1124 elsif Has_Task (Desig_Typ) then 1125 if Is_Array_Type (Desig_Typ) then 1128 elsif Is_Record_Type (Desig_Typ) then 1141 if Is_Array_Type (Desig_Typ) then 1224 if Is_Class_Wide_Type (Desig_Typ) 1226 (Is_Packed_Array (Desig_Typ) [all …]
|
/dports/lang/gcc11/gcc-11.2.0/gcc/ada/ |
H A D | exp_intr.adb | 921 Desig_Typ : constant Entity_Id := constant 1013 if Is_Tagged_Type (Desig_Typ) then 1030 Set_Etype (Obj_Ref, Desig_Typ); 1117 if Is_Task_Type (Desig_Typ) then 1124 elsif Has_Task (Desig_Typ) then 1125 if Is_Array_Type (Desig_Typ) then 1128 elsif Is_Record_Type (Desig_Typ) then 1141 if Is_Array_Type (Desig_Typ) then 1224 if Is_Class_Wide_Type (Desig_Typ) 1226 (Is_Packed_Array (Desig_Typ) [all …]
|
/dports/lang/gcc6-aux/gcc-6-20180516/gcc/ada/ |
H A D | exp_intr.adb | 1077 if Is_Tagged_Type (Desig_Typ) then 1094 Set_Etype (Obj_Ref, Desig_Typ); 1181 if Is_Task_Type (Desig_Typ) then 1188 elsif Has_Task (Desig_Typ) then 1189 if Is_Array_Type (Desig_Typ) then 1192 elsif Is_Record_Type (Desig_Typ) then 1205 if Is_Array_Type (Desig_Typ) then 1288 if Is_Class_Wide_Type (Desig_Typ) 1290 (Is_Array_Type (Desig_Typ) 1292 and then Is_Packed (Desig_Typ)) [all …]
|
/dports/lang/gnat_util/gcc-6-20180516/gcc/ada/ |
H A D | exp_intr.adb | 1077 if Is_Tagged_Type (Desig_Typ) then 1094 Set_Etype (Obj_Ref, Desig_Typ); 1181 if Is_Task_Type (Desig_Typ) then 1188 elsif Has_Task (Desig_Typ) then 1189 if Is_Array_Type (Desig_Typ) then 1192 elsif Is_Record_Type (Desig_Typ) then 1205 if Is_Array_Type (Desig_Typ) then 1288 if Is_Class_Wide_Type (Desig_Typ) 1290 (Is_Array_Type (Desig_Typ) 1292 and then Is_Packed (Desig_Typ)) [all …]
|