| /dports/cad/ghdl/ghdl-1.0.0/src/ortho/debug/ |
| H A D | ortho_debug.adb | 739 D_Type => Dtype);
749 if Atype.D_Type /= O_Tnode_Null
755 Atype.D_Type := Dtype;
1195 Rtype => Acc.Rtype.D_Type,
1282 Check_Type (Get_Base_Type (Lvalue.Rtype), Get_Base_Type (Atype.D_Type));
1317 if Get_Base_Type (Lvalue.Rtype) /= Get_Base_Type (Atype.D_Type) then
|
| H A D | ortho_debug.private.ads | 378 D_Type : O_Tnode; component
|
| H A D | ortho_debug-disp.adb | 891 if Atype.D_Type /= O_Tnode_Null then
892 Disp_Tnode (Atype.D_Type, False);
|
| /dports/cad/ghdl/ghdl-1.0.0/src/vhdl/translate/ |
| H A D | trans-chap3.ads | 220 (Acc : O_Enode; D_Type : Iir) return O_Enode;
|
| H A D | trans-chap7.adb | 3736 D_Type : constant Iir := Get_Designated_Type (A_Type); constant
3737 D_Info : constant Type_Info_Acc := Get_Info (D_Type);
3794 (R, Alloc_Heap, D_Type, Mnode_Null);
3796 (R, E2M (Val, D_Info, Mode_Value), D_Type);
3806 D_Type : constant Iir := constant
3808 D_Info : constant Type_Info_Acc := Get_Info (D_Type);
3827 D_Type : constant Iir := Get_Designated_Type (A_Type); constant
3828 D_Info : constant Type_Info_Acc := Get_Info (D_Type);
3874 Chap4.Init_Object (Res, D_Type);
3883 (Res, Alloc_Heap, D_Type, Bounds);
[all …]
|
| H A D | trans-chap3.adb | 1610 D_Type : constant Iir := Get_Designated_Type (Def); constant
1611 D_Info : constant Type_Info_Acc := Get_Info (D_Type);
1613 if not Is_Fully_Constrained_Type (D_Type) then
1628 D_Type : constant Iir := Get_Designated_Type (Def); constant
1631 D_Info : constant Ortho_Info_Acc := Get_Info (D_Type);
1638 if not Is_Fully_Constrained_Type (D_Type) then
3021 (Acc : O_Enode; D_Type : Iir) return O_Enode
3023 D_Info : constant Type_Info_Acc := Get_Info (D_Type);
|
| /dports/lang/gcc12-devel/gcc-12-20211205/gcc/ada/ |
| H A D | sem_aggr.adb | 1658 D_Type : constant Entity_Id := Etype (Domain); constant
1661 if Is_Array_Type (D_Type) then
1662 Id_Typ := Component_Type (D_Type);
1665 if Has_Aspect (D_Type, Aspect_Iterable) then
1667 Get_Iterable_Type_Primitive (D_Type, Name_Element);
|
| H A D | exp_ch9.adb | 12676 D_Type : Entity_Id; variable
12792 D_Type := Base_Type (Etype (Expression (D_Stat)));
12801 elsif Is_RTE (D_Type, RO_CA_Time) then
12809 else pragma Assert (Is_RTE (D_Type, RO_RT_Time));
|
| /dports/devel/zpu-gcc/zpu-toolchain-1.0/toolchain/gcc/gcc/ada/ |
| H A D | sem_ch3.adb | 11567 D_Type : Entity_Id; variable
11617 D_Type := Find_Dispatching_Type (Prim);
11619 if D_Type = Full_T
11632 and then D_Type /= Full_T
11638 Check_Controlling_Formals (D_Type, Prim);
|
| /dports/devel/zpu-binutils/zpu-toolchain-1.0/toolchain/gcc/gcc/ada/ |
| H A D | sem_ch3.adb | 11567 D_Type : Entity_Id; variable
11617 D_Type := Find_Dispatching_Type (Prim);
11619 if D_Type = Full_T
11632 and then D_Type /= Full_T
11638 Check_Controlling_Formals (D_Type, Prim);
|
| /dports/devel/aarch64-none-elf-gcc/gcc-8.4.0/gcc/ada/ |
| H A D | exp_ch9.adb | 12374 D_Type : Entity_Id; variable
12489 D_Type := Base_Type (Etype (Expression (D_Stat)));
12498 elsif Is_RTE (D_Type, RO_CA_Time) then
12506 else pragma Assert (Is_RTE (D_Type, RO_RT_Time));
|
| /dports/devel/arm-none-eabi-gcc/gcc-8.4.0/gcc/ada/ |
| H A D | exp_ch9.adb | 12374 D_Type : Entity_Id; variable
12489 D_Type := Base_Type (Etype (Expression (D_Stat)));
12498 elsif Is_RTE (D_Type, RO_CA_Time) then
12506 else pragma Assert (Is_RTE (D_Type, RO_RT_Time));
|
| /dports/lang/gnat_util/gcc-6-20180516/gcc/ada/ |
| H A D | exp_ch9.adb | 12457 D_Type : Entity_Id; variable
12572 D_Type := Base_Type (Etype (Expression (D_Stat)));
12581 elsif Is_RTE (D_Type, RO_CA_Time) then
12589 else pragma Assert (Is_RTE (D_Type, RO_RT_Time));
|
| /dports/devel/avr-gcc/gcc-10.2.0/gcc/ada/ |
| H A D | exp_ch9.adb | 12588 D_Type : Entity_Id; variable
12703 D_Type := Base_Type (Etype (Expression (D_Stat)));
12712 elsif Is_RTE (D_Type, RO_CA_Time) then
12720 else pragma Assert (Is_RTE (D_Type, RO_RT_Time));
|
| /dports/lang/gcc11-devel/gcc-11-20211009/gcc/ada/ |
| H A D | exp_ch9.adb | 12684 D_Type : Entity_Id; variable
12800 D_Type := Base_Type (Etype (Expression (D_Stat)));
12809 elsif Is_RTE (D_Type, RO_CA_Time) then
12817 else pragma Assert (Is_RTE (D_Type, RO_RT_Time));
|
| /dports/lang/gcc48/gcc-4.8.5/gcc/ada/ |
| H A D | exp_ch9.adb | 11974 D_Type : Entity_Id; variable
12086 D_Type := Base_Type (Etype (Expression (D_Stat)));
12095 elsif Is_RTE (D_Type, RO_CA_Time) then
12103 else pragma Assert (Is_RTE (D_Type, RO_RT_Time));
|
| /dports/lang/gcc10-devel/gcc-10-20211008/gcc/ada/ |
| H A D | exp_ch9.adb | 12588 D_Type : Entity_Id; variable
12703 D_Type := Base_Type (Etype (Expression (D_Stat)));
12712 elsif Is_RTE (D_Type, RO_CA_Time) then
12720 else pragma Assert (Is_RTE (D_Type, RO_RT_Time));
|
| /dports/devel/mingw32-gcc/gcc-4.8.1/gcc/ada/ |
| H A D | exp_ch9.adb | 11974 D_Type : Entity_Id; variable
12086 D_Type := Base_Type (Etype (Expression (D_Stat)));
12095 elsif Is_RTE (D_Type, RO_CA_Time) then
12103 else pragma Assert (Is_RTE (D_Type, RO_RT_Time));
|
| /dports/devel/arm-none-eabi-gcc492/gcc-4.9.2/gcc/ada/ |
| H A D | exp_ch9.adb | 12147 D_Type : Entity_Id; variable
12262 D_Type := Base_Type (Etype (Expression (D_Stat)));
12271 elsif Is_RTE (D_Type, RO_CA_Time) then
12279 else pragma Assert (Is_RTE (D_Type, RO_RT_Time));
|
| /dports/devel/riscv64-gcc/gcc-8.3.0/gcc/ada/ |
| H A D | exp_ch9.adb | 12375 D_Type : Entity_Id; variable
12490 D_Type := Base_Type (Etype (Expression (D_Stat)));
12499 elsif Is_RTE (D_Type, RO_CA_Time) then
12507 else pragma Assert (Is_RTE (D_Type, RO_RT_Time));
|
| /dports/misc/cxx_atomics_pic/gcc-11.2.0/gcc/ada/ |
| H A D | exp_ch9.adb | 12684 D_Type : Entity_Id; variable
12800 D_Type := Base_Type (Etype (Expression (D_Stat)));
12809 elsif Is_RTE (D_Type, RO_CA_Time) then
12817 else pragma Assert (Is_RTE (D_Type, RO_RT_Time));
|
| /dports/lang/gcc10/gcc-10.3.0/gcc/ada/ |
| H A D | exp_ch9.adb | 12588 D_Type : Entity_Id; variable
12703 D_Type := Base_Type (Etype (Expression (D_Stat)));
12712 elsif Is_RTE (D_Type, RO_CA_Time) then
12720 else pragma Assert (Is_RTE (D_Type, RO_RT_Time));
|
| /dports/lang/gcc8/gcc-8.5.0/gcc/ada/ |
| H A D | exp_ch9.adb | 12374 D_Type : Entity_Id; variable
12489 D_Type := Base_Type (Etype (Expression (D_Stat)));
12498 elsif Is_RTE (D_Type, RO_CA_Time) then
12506 else pragma Assert (Is_RTE (D_Type, RO_RT_Time));
|
| /dports/devel/riscv64-none-elf-gcc/gcc-8.4.0/gcc/ada/ |
| H A D | exp_ch9.adb | 12374 D_Type : Entity_Id; variable
12489 D_Type := Base_Type (Etype (Expression (D_Stat)));
12498 elsif Is_RTE (D_Type, RO_CA_Time) then
12506 else pragma Assert (Is_RTE (D_Type, RO_RT_Time));
|
| /dports/devel/riscv32-unknown-elf-gcc/gcc-8.4.0/gcc/ada/ |
| H A D | exp_ch9.adb | 12374 D_Type : Entity_Id; variable
12489 D_Type := Base_Type (Etype (Expression (D_Stat)));
12498 elsif Is_RTE (D_Type, RO_CA_Time) then
12506 else pragma Assert (Is_RTE (D_Type, RO_RT_Time));
|