Home
last modified time | relevance | path

Searched refs:Discr_Type (Results 1 – 25 of 44) sorted by relevance

12

/dports/devel/aarch64-none-elf-gcc/gcc-8.4.0/gcc/ada/
H A Dsem_ch3.adb5937 Discr_Type : Entity_Id; variable
5980 Discr_Type := Etype (Entity (Discr_Name));
5982 if not Is_Discrete_Type (Discr_Type) then
5992 Analyze_Choices (Variants (N), Discr_Type);
19782 Discr_Type : Entity_Id; variable
19827 Discr_Type :=
19836 Discr_Type := Any_Type;
19842 if Is_Access_Type (Discr_Type) then
19951 elsif Is_Access_Type (Discr_Type)
19963 Discr_Type);
[all …]
H A Dexp_ch3.adb4330 Discr_Type : Entity_Id; variable
4339 Discr_Type := Etype (Discr);
4352 New_Occurrence_Of (Discr_Type, Loc)));
4358 New_Occurrence_Of (Discr_Type, Loc)));
/dports/devel/arm-none-eabi-gcc/gcc-8.4.0/gcc/ada/
H A Dsem_ch3.adb5937 Discr_Type : Entity_Id; variable
5980 Discr_Type := Etype (Entity (Discr_Name));
5982 if not Is_Discrete_Type (Discr_Type) then
5992 Analyze_Choices (Variants (N), Discr_Type);
19782 Discr_Type : Entity_Id; variable
19827 Discr_Type :=
19836 Discr_Type := Any_Type;
19842 if Is_Access_Type (Discr_Type) then
19951 elsif Is_Access_Type (Discr_Type)
19963 Discr_Type);
[all …]
/dports/devel/riscv64-gcc/gcc-8.3.0/gcc/ada/
H A Dsem_ch3.adb5937 Discr_Type : Entity_Id; variable
5980 Discr_Type := Etype (Entity (Discr_Name));
5982 if not Is_Discrete_Type (Discr_Type) then
5992 Analyze_Choices (Variants (N), Discr_Type);
19782 Discr_Type : Entity_Id; variable
19827 Discr_Type :=
19836 Discr_Type := Any_Type;
19842 if Is_Access_Type (Discr_Type) then
19951 elsif Is_Access_Type (Discr_Type)
19963 Discr_Type);
[all …]
/dports/lang/gnat_util/gcc-6-20180516/gcc/ada/
H A Dsem_ch3.adb5278 Discr_Type : Entity_Id; variable
5321 Discr_Type := Etype (Entity (Discr_Name));
5323 if not Is_Discrete_Type (Discr_Type) then
5333 Analyze_Choices (Variants (N), Discr_Type);
18905 Discr_Type : Entity_Id; variable
18950 Discr_Type :=
18959 Discr_Type := Any_Type;
18965 if Is_Access_Type (Discr_Type) then
19074 elsif Is_Access_Type (Discr_Type)
19086 Discr_Type);
[all …]
/dports/devel/riscv32-unknown-elf-gcc/gcc-8.4.0/gcc/ada/
H A Dsem_ch3.adb5937 Discr_Type : Entity_Id; variable
5980 Discr_Type := Etype (Entity (Discr_Name));
5982 if not Is_Discrete_Type (Discr_Type) then
5992 Analyze_Choices (Variants (N), Discr_Type);
19782 Discr_Type : Entity_Id; variable
19827 Discr_Type :=
19836 Discr_Type := Any_Type;
19842 if Is_Access_Type (Discr_Type) then
19951 elsif Is_Access_Type (Discr_Type)
19963 Discr_Type);
[all …]
/dports/devel/riscv64-none-elf-gcc/gcc-8.4.0/gcc/ada/
H A Dsem_ch3.adb5937 Discr_Type : Entity_Id; variable
5980 Discr_Type := Etype (Entity (Discr_Name));
5982 if not Is_Discrete_Type (Discr_Type) then
5992 Analyze_Choices (Variants (N), Discr_Type);
19782 Discr_Type : Entity_Id; variable
19827 Discr_Type :=
19836 Discr_Type := Any_Type;
19842 if Is_Access_Type (Discr_Type) then
19951 elsif Is_Access_Type (Discr_Type)
19963 Discr_Type);
[all …]
/dports/lang/gcc8/gcc-8.5.0/gcc/ada/
H A Dsem_ch3.adb5937 Discr_Type : Entity_Id; variable
5980 Discr_Type := Etype (Entity (Discr_Name));
5982 if not Is_Discrete_Type (Discr_Type) then
5992 Analyze_Choices (Variants (N), Discr_Type);
19782 Discr_Type : Entity_Id; variable
19827 Discr_Type :=
19836 Discr_Type := Any_Type;
19842 if Is_Access_Type (Discr_Type) then
19951 elsif Is_Access_Type (Discr_Type)
19963 Discr_Type);
[all …]
/dports/lang/gcc6-aux/gcc-6-20180516/gcc/ada/
H A Dsem_ch3.adb5278 Discr_Type : Entity_Id; variable
5321 Discr_Type := Etype (Entity (Discr_Name));
5323 if not Is_Discrete_Type (Discr_Type) then
5333 Analyze_Choices (Variants (N), Discr_Type);
18905 Discr_Type : Entity_Id; variable
18950 Discr_Type :=
18959 Discr_Type := Any_Type;
18965 if Is_Access_Type (Discr_Type) then
19074 elsif Is_Access_Type (Discr_Type)
19086 Discr_Type);
[all …]
/dports/lang/gcc12-devel/gcc-12-20211205/gcc/ada/
H A Dsem_ch3.adb6070 Discr_Type : Entity_Id; variable
6113 Discr_Type := Etype (Entity (Discr_Name));
6115 if not Is_Discrete_Type (Discr_Type) then
20469 Discr_Type : Entity_Id; variable
20519 Discr_Type :=
20529 Discr_Type :=
20538 Discr_Type := Any_Type;
20544 if Is_Access_Type (Discr_Type) then
20653 elsif Is_Access_Type (Discr_Type)
20665 Discr_Type);
[all …]
/dports/lang/gcc48/gcc-4.8.5/gcc/ada/
H A Dsem_ch3.adb4634 Discr_Type : Entity_Id; variable
4661 Discr_Type := Etype (Entity (Discr_Name));
4663 if not Is_Discrete_Type (Discr_Type) then
17443 Discr_Type : Entity_Id; variable
17488 Discr_Type :=
17497 Discr_Type := Any_Type;
17501 if Is_Access_Type (Discr_Type) then
17592 elsif Is_Access_Type (Discr_Type)
17598 and then not Is_Itype (Discr_Type)
17604 Discr_Type);
[all …]
/dports/devel/mingw32-gcc/gcc-4.8.1/gcc/ada/
H A Dsem_ch3.adb4634 Discr_Type : Entity_Id; variable
4661 Discr_Type := Etype (Entity (Discr_Name));
4663 if not Is_Discrete_Type (Discr_Type) then
17443 Discr_Type : Entity_Id; variable
17488 Discr_Type :=
17497 Discr_Type := Any_Type;
17501 if Is_Access_Type (Discr_Type) then
17592 elsif Is_Access_Type (Discr_Type)
17598 and then not Is_Itype (Discr_Type)
17604 Discr_Type);
[all …]
/dports/devel/arm-none-eabi-gcc492/gcc-4.9.2/gcc/ada/
H A Dsem_ch3.adb4908 Discr_Type : Entity_Id; variable
4951 Discr_Type := Etype (Entity (Discr_Name));
4953 if not Is_Discrete_Type (Discr_Type) then
4963 Analyze_Choices (Variants (N), Discr_Type);
17843 Discr_Type : Entity_Id; variable
17888 Discr_Type :=
17897 Discr_Type := Any_Type;
17901 if Is_Access_Type (Discr_Type) then
17992 elsif Is_Access_Type (Discr_Type)
18004 Discr_Type);
[all …]
H A Dexp_ch3.adb4369 Discr_Type : Entity_Id; variable
4378 Discr_Type := Etype (Discr);
4391 New_Occurrence_Of (Discr_Type, Loc)));
4397 New_Occurrence_Of (Discr_Type, Loc)));
/dports/lang/gcc11-devel/gcc-11-20211009/gcc/ada/
H A Dsem_ch3.adb5946 Discr_Type : Entity_Id; variable
5989 Discr_Type := Etype (Entity (Discr_Name));
5991 if not Is_Discrete_Type (Discr_Type) then
6001 Analyze_Choices (Variants (N), Discr_Type);
20031 Discr_Type : Entity_Id; variable
20076 Discr_Type :=
20085 Discr_Type := Any_Type;
20091 if Is_Access_Type (Discr_Type) then
20200 elsif Is_Access_Type (Discr_Type)
20212 Discr_Type);
[all …]
/dports/lang/gcc11/gcc-11.2.0/gcc/ada/
H A Dsem_ch3.adb5946 Discr_Type : Entity_Id; variable
5989 Discr_Type := Etype (Entity (Discr_Name));
5991 if not Is_Discrete_Type (Discr_Type) then
6001 Analyze_Choices (Variants (N), Discr_Type);
20031 Discr_Type : Entity_Id; variable
20076 Discr_Type :=
20085 Discr_Type := Any_Type;
20091 if Is_Access_Type (Discr_Type) then
20200 elsif Is_Access_Type (Discr_Type)
20212 Discr_Type);
[all …]
/dports/misc/cxx_atomics_pic/gcc-11.2.0/gcc/ada/
H A Dsem_ch3.adb5946 Discr_Type : Entity_Id; variable
5989 Discr_Type := Etype (Entity (Discr_Name));
5991 if not Is_Discrete_Type (Discr_Type) then
6001 Analyze_Choices (Variants (N), Discr_Type);
20031 Discr_Type : Entity_Id; variable
20076 Discr_Type :=
20085 Discr_Type := Any_Type;
20091 if Is_Access_Type (Discr_Type) then
20200 elsif Is_Access_Type (Discr_Type)
20212 Discr_Type);
[all …]
/dports/lang/gcc9/gcc-9.4.0/gcc/ada/
H A Dsem_ch3.adb5999 Discr_Type : Entity_Id; variable
6042 Discr_Type := Etype (Entity (Discr_Name));
6044 if not Is_Discrete_Type (Discr_Type) then
6054 Analyze_Choices (Variants (N), Discr_Type);
19942 Discr_Type : Entity_Id; variable
19987 Discr_Type :=
19996 Discr_Type := Any_Type;
20002 if Is_Access_Type (Discr_Type) then
20111 elsif Is_Access_Type (Discr_Type)
20123 Discr_Type);
[all …]
/dports/lang/gcc10-devel/gcc-10-20211008/gcc/ada/
H A Dsem_ch3.adb6055 Discr_Type : Entity_Id; variable
6098 Discr_Type := Etype (Entity (Discr_Name));
6100 if not Is_Discrete_Type (Discr_Type) then
6110 Analyze_Choices (Variants (N), Discr_Type);
20062 Discr_Type : Entity_Id; variable
20107 Discr_Type :=
20116 Discr_Type := Any_Type;
20122 if Is_Access_Type (Discr_Type) then
20231 elsif Is_Access_Type (Discr_Type)
20243 Discr_Type);
[all …]
/dports/devel/avr-gcc/gcc-10.2.0/gcc/ada/
H A Dsem_ch3.adb6055 Discr_Type : Entity_Id; variable
6098 Discr_Type := Etype (Entity (Discr_Name));
6100 if not Is_Discrete_Type (Discr_Type) then
6110 Analyze_Choices (Variants (N), Discr_Type);
20062 Discr_Type : Entity_Id; variable
20107 Discr_Type :=
20116 Discr_Type := Any_Type;
20122 if Is_Access_Type (Discr_Type) then
20231 elsif Is_Access_Type (Discr_Type)
20243 Discr_Type);
[all …]
/dports/lang/gcc10/gcc-10.3.0/gcc/ada/
H A Dsem_ch3.adb6055 Discr_Type : Entity_Id; variable
6098 Discr_Type := Etype (Entity (Discr_Name));
6100 if not Is_Discrete_Type (Discr_Type) then
6110 Analyze_Choices (Variants (N), Discr_Type);
20062 Discr_Type : Entity_Id; variable
20107 Discr_Type :=
20116 Discr_Type := Any_Type;
20122 if Is_Access_Type (Discr_Type) then
20231 elsif Is_Access_Type (Discr_Type)
20243 Discr_Type);
[all …]
/dports/lang/gcc9-aux/gcc-9.1.0/gcc/ada/
H A Dsem_ch3.adb5999 Discr_Type : Entity_Id; variable
6042 Discr_Type := Etype (Entity (Discr_Name));
6044 if not Is_Discrete_Type (Discr_Type) then
6054 Analyze_Choices (Variants (N), Discr_Type);
19942 Discr_Type : Entity_Id; variable
19987 Discr_Type :=
19996 Discr_Type := Any_Type;
20002 if Is_Access_Type (Discr_Type) then
20111 elsif Is_Access_Type (Discr_Type)
20123 Discr_Type);
[all …]
/dports/lang/gcc9-devel/gcc-9-20211007/gcc/ada/
H A Dsem_ch3.adb5999 Discr_Type : Entity_Id; variable
6042 Discr_Type := Etype (Entity (Discr_Name));
6044 if not Is_Discrete_Type (Discr_Type) then
6054 Analyze_Choices (Variants (N), Discr_Type);
19942 Discr_Type : Entity_Id; variable
19987 Discr_Type :=
19996 Discr_Type := Any_Type;
20002 if Is_Access_Type (Discr_Type) then
20111 elsif Is_Access_Type (Discr_Type)
20123 Discr_Type);
[all …]
/dports/devel/zpu-gcc/zpu-toolchain-1.0/toolchain/gcc/gcc/ada/
H A Dsem_ch3.adb2695 Discr_Type : Entity_Id; variable
2712 Discr_Type := Etype (Entity (Discr_Name));
2714 if not Is_Discrete_Type (Discr_Type) then
2724 (N, Discr_Type, Case_Table, Last_Choice, Dont_Care, Others_Present);
11182 Discr_Type : Entity_Id; variable
11223 Discr_Type := Etype (Discriminant_Type (Discr));
11226 Discr_Type := Any_Type;
11230 if Is_Access_Type (Discr_Type) then
11239 elsif not Is_Discrete_Type (Discr_Type) then
11244 Set_Etype (Defining_Identifier (Discr), Discr_Type);
[all …]
/dports/devel/zpu-binutils/zpu-toolchain-1.0/toolchain/gcc/gcc/ada/
H A Dsem_ch3.adb2695 Discr_Type : Entity_Id; variable
2712 Discr_Type := Etype (Entity (Discr_Name));
2714 if not Is_Discrete_Type (Discr_Type) then
2724 (N, Discr_Type, Case_Table, Last_Choice, Dont_Care, Others_Present);
11182 Discr_Type : Entity_Id; variable
11223 Discr_Type := Etype (Discriminant_Type (Discr));
11226 Discr_Type := Any_Type;
11230 if Is_Access_Type (Discr_Type) then
11239 elsif not Is_Discrete_Type (Discr_Type) then
11244 Set_Etype (Defining_Identifier (Discr), Discr_Type);
[all …]

12