/dports/lang/gcc6-aux/gcc-6-20180516/gcc/ada/ |
H A D | sem_ch6.adb | 2683 Formal_Typ : Entity_Id; variable 2691 Formal_Typ := Root_Type (Formal_Typ); 2840 Formal_Typ : Entity_Id; variable 2848 Formal_Typ := Root_Type (Formal_Typ); 2851 Formal_Typ := Corresponding_Concurrent_Type (Formal_Typ); 6962 Formal_Typ : Entity_Id; 7026 Formal_Typ := 7030 Set_Etype (Formal_Typ, Formal_Typ); 7032 (Formal_Typ, Has_Private_Component (Formal_Typ)); 7033 Set_Is_Public (Formal_Typ, Is_Public (Scope (Formal_Typ))); [all …]
|
/dports/lang/gnat_util/gcc-6-20180516/gcc/ada/ |
H A D | sem_ch6.adb | 2683 Formal_Typ : Entity_Id; variable 2691 Formal_Typ := Root_Type (Formal_Typ); 2840 Formal_Typ : Entity_Id; variable 2848 Formal_Typ := Root_Type (Formal_Typ); 2851 Formal_Typ := Corresponding_Concurrent_Type (Formal_Typ); 6962 Formal_Typ : Entity_Id; 7026 Formal_Typ := 7030 Set_Etype (Formal_Typ, Formal_Typ); 7032 (Formal_Typ, Has_Private_Component (Formal_Typ)); 7033 Set_Is_Public (Formal_Typ, Is_Public (Scope (Formal_Typ))); [all …]
|
/dports/devel/aarch64-none-elf-gcc/gcc-8.4.0/gcc/ada/ |
H A D | sem_ch6.adb | 3069 Formal_Typ : Entity_Id; variable 3077 Formal_Typ := Root_Type (Formal_Typ); 3233 Formal_Typ : Entity_Id; variable 3241 Formal_Typ := Root_Type (Formal_Typ); 3244 Formal_Typ := Corresponding_Concurrent_Type (Formal_Typ); 8071 Formal_Typ : Entity_Id; variable 8134 Formal_Typ := 8145 Set_Etype (Formal_Typ, Formal_Typ); 8147 (Formal_Typ, Has_Private_Component (Formal_Typ)); 8148 Set_Is_Public (Formal_Typ, Is_Public (Scope (Formal_Typ))); [all …]
|
/dports/lang/gcc9/gcc-9.4.0/gcc/ada/ |
H A D | sem_ch6.adb | 2964 Formal_Typ : Entity_Id; variable 2972 Formal_Typ := Root_Type (Formal_Typ); 3128 Formal_Typ : Entity_Id; variable 3136 Formal_Typ := Root_Type (Formal_Typ); 3139 Formal_Typ := Corresponding_Concurrent_Type (Formal_Typ); 8054 Formal_Typ : Entity_Id; variable 8117 Formal_Typ := 8128 Set_Etype (Formal_Typ, Formal_Typ); 8130 (Formal_Typ, Has_Private_Component (Formal_Typ)); 8131 Set_Is_Public (Formal_Typ, Is_Public (Scope (Formal_Typ))); [all …]
|
/dports/devel/arm-none-eabi-gcc/gcc-8.4.0/gcc/ada/ |
H A D | sem_ch6.adb | 3069 Formal_Typ : Entity_Id; variable 3077 Formal_Typ := Root_Type (Formal_Typ); 3233 Formal_Typ : Entity_Id; variable 3241 Formal_Typ := Root_Type (Formal_Typ); 3244 Formal_Typ := Corresponding_Concurrent_Type (Formal_Typ); 8071 Formal_Typ : Entity_Id; variable 8134 Formal_Typ := 8145 Set_Etype (Formal_Typ, Formal_Typ); 8147 (Formal_Typ, Has_Private_Component (Formal_Typ)); 8148 Set_Is_Public (Formal_Typ, Is_Public (Scope (Formal_Typ))); [all …]
|
/dports/devel/avr-gcc/gcc-10.2.0/gcc/ada/ |
H A D | sem_ch6.adb | 3102 Formal_Typ : Entity_Id; variable 3110 Formal_Typ := Root_Type (Formal_Typ); 3266 Formal_Typ : Entity_Id; variable 3274 Formal_Typ := Root_Type (Formal_Typ); 3277 Formal_Typ := Corresponding_Concurrent_Type (Formal_Typ); 8350 Formal_Typ : Entity_Id; variable 8413 Formal_Typ := 8424 Set_Etype (Formal_Typ, Formal_Typ); 8426 (Formal_Typ, Has_Private_Component (Formal_Typ)); 8427 Set_Is_Public (Formal_Typ, Is_Public (Scope (Formal_Typ))); [all …]
|
H A D | exp_disp.adb | 1668 Formal_Typ : Entity_Id; variable 1703 Formal_Typ := Etype (Formal); 1705 if Has_Non_Limited_View (Formal_Typ) then 1706 Formal_Typ := Non_Limited_View (Formal_Typ); 1710 Formal_Typ := Full_View (Formal_Typ); 1713 if Is_Access_Type (Formal_Typ) then 1735 if Is_Interface (Formal_Typ) 1736 and then Is_Class_Wide_Type (Formal_Typ) 1741 if Actual_Typ = Formal_Typ then 1748 elsif Is_Ancestor (Formal_Typ, Actual_Typ, [all …]
|
/dports/devel/riscv64-gcc/gcc-8.3.0/gcc/ada/ |
H A D | sem_ch6.adb | 3069 Formal_Typ : Entity_Id; variable 3077 Formal_Typ := Root_Type (Formal_Typ); 3233 Formal_Typ : Entity_Id; variable 3241 Formal_Typ := Root_Type (Formal_Typ); 3244 Formal_Typ := Corresponding_Concurrent_Type (Formal_Typ); 8071 Formal_Typ : Entity_Id; variable 8134 Formal_Typ := 8145 Set_Etype (Formal_Typ, Formal_Typ); 8147 (Formal_Typ, Has_Private_Component (Formal_Typ)); 8148 Set_Is_Public (Formal_Typ, Is_Public (Scope (Formal_Typ))); [all …]
|
/dports/lang/gcc10-devel/gcc-10-20211008/gcc/ada/ |
H A D | sem_ch6.adb | 3102 Formal_Typ : Entity_Id; variable 3110 Formal_Typ := Root_Type (Formal_Typ); 3266 Formal_Typ : Entity_Id; variable 3274 Formal_Typ := Root_Type (Formal_Typ); 3277 Formal_Typ := Corresponding_Concurrent_Type (Formal_Typ); 8350 Formal_Typ : Entity_Id; variable 8413 Formal_Typ := 8424 Set_Etype (Formal_Typ, Formal_Typ); 8426 (Formal_Typ, Has_Private_Component (Formal_Typ)); 8427 Set_Is_Public (Formal_Typ, Is_Public (Scope (Formal_Typ))); [all …]
|
H A D | exp_disp.adb | 1668 Formal_Typ : Entity_Id; variable 1703 Formal_Typ := Etype (Formal); 1705 if Has_Non_Limited_View (Formal_Typ) then 1706 Formal_Typ := Non_Limited_View (Formal_Typ); 1710 Formal_Typ := Full_View (Formal_Typ); 1713 if Is_Access_Type (Formal_Typ) then 1735 if Is_Interface (Formal_Typ) 1736 and then Is_Class_Wide_Type (Formal_Typ) 1741 if Actual_Typ = Formal_Typ then 1748 elsif Is_Ancestor (Formal_Typ, Actual_Typ, [all …]
|
/dports/devel/riscv32-unknown-elf-gcc/gcc-8.4.0/gcc/ada/ |
H A D | sem_ch6.adb | 3069 Formal_Typ : Entity_Id; variable 3077 Formal_Typ := Root_Type (Formal_Typ); 3233 Formal_Typ : Entity_Id; variable 3241 Formal_Typ := Root_Type (Formal_Typ); 3244 Formal_Typ := Corresponding_Concurrent_Type (Formal_Typ); 8071 Formal_Typ : Entity_Id; variable 8134 Formal_Typ := 8145 Set_Etype (Formal_Typ, Formal_Typ); 8147 (Formal_Typ, Has_Private_Component (Formal_Typ)); 8148 Set_Is_Public (Formal_Typ, Is_Public (Scope (Formal_Typ))); [all …]
|
/dports/devel/riscv64-none-elf-gcc/gcc-8.4.0/gcc/ada/ |
H A D | sem_ch6.adb | 3069 Formal_Typ : Entity_Id; variable 3077 Formal_Typ := Root_Type (Formal_Typ); 3233 Formal_Typ : Entity_Id; variable 3241 Formal_Typ := Root_Type (Formal_Typ); 3244 Formal_Typ := Corresponding_Concurrent_Type (Formal_Typ); 8071 Formal_Typ : Entity_Id; variable 8134 Formal_Typ := 8145 Set_Etype (Formal_Typ, Formal_Typ); 8147 (Formal_Typ, Has_Private_Component (Formal_Typ)); 8148 Set_Is_Public (Formal_Typ, Is_Public (Scope (Formal_Typ))); [all …]
|
/dports/lang/gcc10/gcc-10.3.0/gcc/ada/ |
H A D | sem_ch6.adb | 3102 Formal_Typ : Entity_Id; variable 3110 Formal_Typ := Root_Type (Formal_Typ); 3266 Formal_Typ : Entity_Id; variable 3274 Formal_Typ := Root_Type (Formal_Typ); 3277 Formal_Typ := Corresponding_Concurrent_Type (Formal_Typ); 8350 Formal_Typ : Entity_Id; variable 8413 Formal_Typ := 8424 Set_Etype (Formal_Typ, Formal_Typ); 8426 (Formal_Typ, Has_Private_Component (Formal_Typ)); 8427 Set_Is_Public (Formal_Typ, Is_Public (Scope (Formal_Typ))); [all …]
|
/dports/lang/gcc8/gcc-8.5.0/gcc/ada/ |
H A D | sem_ch6.adb | 3069 Formal_Typ : Entity_Id; variable 3077 Formal_Typ := Root_Type (Formal_Typ); 3233 Formal_Typ : Entity_Id; variable 3241 Formal_Typ := Root_Type (Formal_Typ); 3244 Formal_Typ := Corresponding_Concurrent_Type (Formal_Typ); 8071 Formal_Typ : Entity_Id; variable 8134 Formal_Typ := 8145 Set_Etype (Formal_Typ, Formal_Typ); 8147 (Formal_Typ, Has_Private_Component (Formal_Typ)); 8148 Set_Is_Public (Formal_Typ, Is_Public (Scope (Formal_Typ))); [all …]
|
/dports/lang/gcc9-aux/gcc-9.1.0/gcc/ada/ |
H A D | sem_ch6.adb | 2964 Formal_Typ : Entity_Id; variable 2972 Formal_Typ := Root_Type (Formal_Typ); 3128 Formal_Typ : Entity_Id; variable 3136 Formal_Typ := Root_Type (Formal_Typ); 3139 Formal_Typ := Corresponding_Concurrent_Type (Formal_Typ); 8054 Formal_Typ : Entity_Id; variable 8117 Formal_Typ := 8128 Set_Etype (Formal_Typ, Formal_Typ); 8130 (Formal_Typ, Has_Private_Component (Formal_Typ)); 8131 Set_Is_Public (Formal_Typ, Is_Public (Scope (Formal_Typ))); [all …]
|
/dports/lang/gcc9-devel/gcc-9-20211007/gcc/ada/ |
H A D | sem_ch6.adb | 2964 Formal_Typ : Entity_Id; variable 2972 Formal_Typ := Root_Type (Formal_Typ); 3128 Formal_Typ : Entity_Id; variable 3136 Formal_Typ := Root_Type (Formal_Typ); 3139 Formal_Typ := Corresponding_Concurrent_Type (Formal_Typ); 8054 Formal_Typ : Entity_Id; variable 8117 Formal_Typ := 8128 Set_Etype (Formal_Typ, Formal_Typ); 8130 (Formal_Typ, Has_Private_Component (Formal_Typ)); 8131 Set_Is_Public (Formal_Typ, Is_Public (Scope (Formal_Typ))); [all …]
|
/dports/devel/arm-none-eabi-gcc492/gcc-4.9.2/gcc/ada/ |
H A D | sem_ch6.adb | 2566 Formal_Typ : Entity_Id; variable 2574 Formal_Typ := Root_Type (Formal_Typ); 2720 Formal_Typ : Entity_Id; variable 2728 Formal_Typ := Root_Type (Formal_Typ); 2731 Formal_Typ := Corresponding_Concurrent_Type (Formal_Typ); 8254 Formal_Typ : Entity_Id; 8320 Formal_Typ := 8324 Set_Etype (Formal_Typ, Formal_Typ); 8326 (Formal_Typ, Has_Private_Component (Formal_Typ)); 8327 Set_Is_Public (Formal_Typ, Is_Public (Scope (Formal_Typ))); [all …]
|
/dports/lang/gcc11-devel/gcc-11-20211009/gcc/ada/ |
H A D | sem_ch6.adb | 3563 Formal_Typ : Entity_Id; variable 3571 Formal_Typ := Root_Type (Formal_Typ); 3787 Formal_Typ : Entity_Id; variable 3795 Formal_Typ := Root_Type (Formal_Typ); 3798 Formal_Typ := Corresponding_Concurrent_Type (Formal_Typ); 8972 Formal_Typ : Entity_Id; variable 9038 Formal_Typ := 9049 Set_Etype (Formal_Typ, Formal_Typ); 9051 (Formal_Typ, Has_Private_Component (Formal_Typ)); 9052 Set_Is_Public (Formal_Typ, Is_Public (Scope (Formal_Typ))); [all …]
|
/dports/lang/gcc12-devel/gcc-12-20211205/gcc/ada/ |
H A D | sem_ch6.adb | 3583 Formal_Typ : Entity_Id; variable 3591 Formal_Typ := Root_Type (Formal_Typ); 3807 Formal_Typ : Entity_Id; variable 3815 Formal_Typ := Root_Type (Formal_Typ); 3818 Formal_Typ := Corresponding_Concurrent_Type (Formal_Typ); 9096 Formal_Typ : Entity_Id; variable 9162 Formal_Typ := 9173 Set_Etype (Formal_Typ, Formal_Typ); 9175 (Formal_Typ, Has_Private_Component (Formal_Typ)); 9176 Set_Is_Public (Formal_Typ, Is_Public (Scope (Formal_Typ))); [all …]
|
H A D | exp_disp.adb | 1551 Formal_Typ : Entity_Id; variable 1586 Formal_Typ := Etype (Formal); 1588 if Has_Non_Limited_View (Formal_Typ) then 1589 Formal_Typ := Non_Limited_View (Formal_Typ); 1593 Formal_Typ := Full_View (Formal_Typ); 1596 if Is_Access_Type (Formal_Typ) then 1618 if Is_Interface (Formal_Typ) 1619 and then Is_Class_Wide_Type (Formal_Typ) 1624 if Actual_Typ = Formal_Typ then 1631 elsif Is_Ancestor (Formal_Typ, Actual_Typ, [all …]
|
/dports/lang/gcc11/gcc-11.2.0/gcc/ada/ |
H A D | sem_ch6.adb | 3563 Formal_Typ : Entity_Id; variable 3571 Formal_Typ := Root_Type (Formal_Typ); 3787 Formal_Typ : Entity_Id; variable 3795 Formal_Typ := Root_Type (Formal_Typ); 3798 Formal_Typ := Corresponding_Concurrent_Type (Formal_Typ); 8972 Formal_Typ : Entity_Id; variable 9038 Formal_Typ := 9049 Set_Etype (Formal_Typ, Formal_Typ); 9051 (Formal_Typ, Has_Private_Component (Formal_Typ)); 9052 Set_Is_Public (Formal_Typ, Is_Public (Scope (Formal_Typ))); [all …]
|
/dports/misc/cxx_atomics_pic/gcc-11.2.0/gcc/ada/ |
H A D | sem_ch6.adb | 3563 Formal_Typ : Entity_Id; variable 3571 Formal_Typ := Root_Type (Formal_Typ); 3787 Formal_Typ : Entity_Id; variable 3795 Formal_Typ := Root_Type (Formal_Typ); 3798 Formal_Typ := Corresponding_Concurrent_Type (Formal_Typ); 8972 Formal_Typ : Entity_Id; variable 9038 Formal_Typ := 9049 Set_Etype (Formal_Typ, Formal_Typ); 9051 (Formal_Typ, Has_Private_Component (Formal_Typ)); 9052 Set_Is_Public (Formal_Typ, Is_Public (Scope (Formal_Typ))); [all …]
|
/dports/lang/gcc48/gcc-4.8.5/gcc/ada/ |
H A D | sem_ch6.adb | 2187 Formal_Typ : Entity_Id; variable 2195 Formal_Typ := Root_Type (Formal_Typ); 2341 Formal_Typ : Entity_Id; variable 2349 Formal_Typ := Root_Type (Formal_Typ); 2352 Formal_Typ := Corresponding_Concurrent_Type (Formal_Typ); 7985 Formal_Typ : Entity_Id; 8051 Formal_Typ := 8055 Set_Etype (Formal_Typ, Formal_Typ); 8057 (Formal_Typ, Has_Private_Component (Formal_Typ)); 8058 Set_Is_Public (Formal_Typ, Is_Public (Scope (Formal_Typ))); [all …]
|
/dports/devel/mingw32-gcc/gcc-4.8.1/gcc/ada/ |
H A D | sem_ch6.adb | 2187 Formal_Typ : Entity_Id; variable 2195 Formal_Typ := Root_Type (Formal_Typ); 2341 Formal_Typ : Entity_Id; variable 2349 Formal_Typ := Root_Type (Formal_Typ); 2352 Formal_Typ := Corresponding_Concurrent_Type (Formal_Typ); 7985 Formal_Typ : Entity_Id; 8051 Formal_Typ := 8055 Set_Etype (Formal_Typ, Formal_Typ); 8057 (Formal_Typ, Has_Private_Component (Formal_Typ)); 8058 Set_Is_Public (Formal_Typ, Is_Public (Scope (Formal_Typ))); [all …]
|
/dports/cad/ghdl/ghdl-1.0.0/src/synth/ |
H A D | synth-insts.adb | 691 Formal_Typ : Type_Acc; variable 714 Formal_Typ := Get_Subtype_Object (Inter_Inst, Get_Type (Inter)); 716 Act := Synth_Expression_With_Type (Act_Inst, Actual, Formal_Typ); 718 (Get_Build (Act_Inst), Act, Formal_Typ, False, Assoc); 767 Formal_Typ : Type_Acc; variable 783 Formal_Typ := Get_Value (Inter_Inst, Inter).Typ; 788 O := Create_Value_Net (Port, Formal_Typ);
|