/dports/lang/asis/asis-gpl-2016-src/tools/gnattest/ |
H A D | gnattest-skeleton-generator-gather_data.adb | 91 Original_Type : Asis.Element; 356 Original_Type : Asis.Element; 452 (Get_Nesting (Original_Type), 487 Test_Routine_Wrapper.Original_Type := Original_Type; 2327 Original_Type : Asis.Element; variable 2550 Original_Type := Owner_Decl; 2612 (First_Name (Original_Type))) & 2615 (First_Name (Original_Type))) & 2629 (First_Name (Original_Type))) & 2772 Original_Type := Asis.Nil_Element; [all …]
|
H A D | gnattest-skeleton-generator.adb | 275 Original_Type : Asis.Element := Asis.Nil_Element; component 285 Original_Type : Asis.Element := Asis.Nil_Element; component 296 Original_Type : Asis.Element := Asis.Nil_Element; component 929 (Owner_Decl, TR_W.Original_Type) 948 (Test_Type_Wrapper.Original_Type, TR_W.Original_Type) 968 LTR_W.Original_Type := TR_W.Original_Type; 5712 Original_Type : Asis.Element; variable 5741 Original_Type := S_Data.TR_List.Element (K).Original_Type; 5768 Original_Type := S_Data.ITR_List.Element (K).Original_Type; 5796 Original_Type := S_Data.LTR_List.Element (K).Original_Type; [all …]
|
H A D | gnattest-harness-generator.adb | 284 Original_Type : Asis.Element; variable 304 Original_Type := Enclosing_Element (Primitive_Owner (Subp)); 350 (Integer'Image (First_Line_Number (Original_Type)), 354 (Integer'Image (First_Column_Number (Original_Type)),
|
/dports/devel/aarch64-none-elf-gcc/gcc-8.4.0/gcc/ada/ |
H A D | sem_ch3.adb | 18664 Original_Type : Entity_Id; variable 18708 Original_Type := Scope (Original_Comp); 18714 if not Is_Tagged_Type (Original_Type) then 18728 (not Has_Unknown_Discriminants (Original_Type) 18743 if not Is_Tagged_Type (Original_Type) 18744 or else not Is_Private_Type (Original_Type) 18783 elsif Is_Private_Type (Original_Type) 18787 and then Has_Private_Declaration (Original_Type)) 18830 if Ancestor = Original_Type then 18837 elsif In_Private_Part (Scope (Original_Type)) [all …]
|
/dports/devel/arm-none-eabi-gcc/gcc-8.4.0/gcc/ada/ |
H A D | sem_ch3.adb | 18664 Original_Type : Entity_Id; variable 18708 Original_Type := Scope (Original_Comp); 18714 if not Is_Tagged_Type (Original_Type) then 18728 (not Has_Unknown_Discriminants (Original_Type) 18743 if not Is_Tagged_Type (Original_Type) 18744 or else not Is_Private_Type (Original_Type) 18783 elsif Is_Private_Type (Original_Type) 18787 and then Has_Private_Declaration (Original_Type)) 18830 if Ancestor = Original_Type then 18837 elsif In_Private_Part (Scope (Original_Type)) [all …]
|
/dports/devel/riscv64-gcc/gcc-8.3.0/gcc/ada/ |
H A D | sem_ch3.adb | 18664 Original_Type : Entity_Id; variable 18708 Original_Type := Scope (Original_Comp); 18714 if not Is_Tagged_Type (Original_Type) then 18728 (not Has_Unknown_Discriminants (Original_Type) 18743 if not Is_Tagged_Type (Original_Type) 18744 or else not Is_Private_Type (Original_Type) 18783 elsif Is_Private_Type (Original_Type) 18787 and then Has_Private_Declaration (Original_Type)) 18830 if Ancestor = Original_Type then 18837 elsif In_Private_Part (Scope (Original_Type)) [all …]
|
/dports/devel/riscv32-unknown-elf-gcc/gcc-8.4.0/gcc/ada/ |
H A D | sem_ch3.adb | 18664 Original_Type : Entity_Id; variable 18708 Original_Type := Scope (Original_Comp); 18714 if not Is_Tagged_Type (Original_Type) then 18728 (not Has_Unknown_Discriminants (Original_Type) 18743 if not Is_Tagged_Type (Original_Type) 18744 or else not Is_Private_Type (Original_Type) 18783 elsif Is_Private_Type (Original_Type) 18787 and then Has_Private_Declaration (Original_Type)) 18830 if Ancestor = Original_Type then 18837 elsif In_Private_Part (Scope (Original_Type)) [all …]
|
/dports/devel/riscv64-none-elf-gcc/gcc-8.4.0/gcc/ada/ |
H A D | sem_ch3.adb | 18664 Original_Type : Entity_Id; variable 18708 Original_Type := Scope (Original_Comp); 18714 if not Is_Tagged_Type (Original_Type) then 18728 (not Has_Unknown_Discriminants (Original_Type) 18743 if not Is_Tagged_Type (Original_Type) 18744 or else not Is_Private_Type (Original_Type) 18783 elsif Is_Private_Type (Original_Type) 18787 and then Has_Private_Declaration (Original_Type)) 18830 if Ancestor = Original_Type then 18837 elsif In_Private_Part (Scope (Original_Type)) [all …]
|
/dports/lang/gcc8/gcc-8.5.0/gcc/ada/ |
H A D | sem_ch3.adb | 18664 Original_Type : Entity_Id; variable 18708 Original_Type := Scope (Original_Comp); 18714 if not Is_Tagged_Type (Original_Type) then 18728 (not Has_Unknown_Discriminants (Original_Type) 18743 if not Is_Tagged_Type (Original_Type) 18744 or else not Is_Private_Type (Original_Type) 18783 elsif Is_Private_Type (Original_Type) 18787 and then Has_Private_Declaration (Original_Type)) 18830 if Ancestor = Original_Type then 18837 elsif In_Private_Part (Scope (Original_Type)) [all …]
|
/dports/lang/gcc9/gcc-9.4.0/gcc/ada/ |
H A D | sem_ch3.adb | 18803 Original_Type : Entity_Id; variable 18847 Original_Type := Scope (Original_Comp); 18853 if not Is_Tagged_Type (Original_Type) then 18879 (not Has_Unknown_Discriminants (Original_Type) 18894 if not Is_Tagged_Type (Original_Type) 18895 or else not Is_Private_Type (Original_Type) 18934 elsif Is_Private_Type (Original_Type) 18938 and then Has_Private_Declaration (Original_Type)) 18981 if Ancestor = Original_Type then 18988 elsif In_Private_Part (Scope (Original_Type)) [all …]
|
/dports/lang/gcc10-devel/gcc-10-20211008/gcc/ada/ |
H A D | sem_ch3.adb | 18918 Original_Type : Entity_Id; variable 18962 Original_Type := Scope (Original_Comp); 18968 if not Is_Tagged_Type (Original_Type) then 18994 (not Has_Unknown_Discriminants (Original_Type) 19009 if not Is_Tagged_Type (Original_Type) 19010 or else not Is_Private_Type (Original_Type) 19049 elsif Is_Private_Type (Original_Type) 19053 and then Has_Private_Declaration (Original_Type)) 19096 if Ancestor = Original_Type then 19103 elsif In_Private_Part (Scope (Original_Type)) [all …]
|
/dports/devel/avr-gcc/gcc-10.2.0/gcc/ada/ |
H A D | sem_ch3.adb | 18918 Original_Type : Entity_Id; variable 18962 Original_Type := Scope (Original_Comp); 18968 if not Is_Tagged_Type (Original_Type) then 18994 (not Has_Unknown_Discriminants (Original_Type) 19009 if not Is_Tagged_Type (Original_Type) 19010 or else not Is_Private_Type (Original_Type) 19049 elsif Is_Private_Type (Original_Type) 19053 and then Has_Private_Declaration (Original_Type)) 19096 if Ancestor = Original_Type then 19103 elsif In_Private_Part (Scope (Original_Type)) [all …]
|
/dports/lang/gcc10/gcc-10.3.0/gcc/ada/ |
H A D | sem_ch3.adb | 18918 Original_Type : Entity_Id; variable 18962 Original_Type := Scope (Original_Comp); 18968 if not Is_Tagged_Type (Original_Type) then 18994 (not Has_Unknown_Discriminants (Original_Type) 19009 if not Is_Tagged_Type (Original_Type) 19010 or else not Is_Private_Type (Original_Type) 19049 elsif Is_Private_Type (Original_Type) 19053 and then Has_Private_Declaration (Original_Type)) 19096 if Ancestor = Original_Type then 19103 elsif In_Private_Part (Scope (Original_Type)) [all …]
|
/dports/lang/gcc9-aux/gcc-9.1.0/gcc/ada/ |
H A D | sem_ch3.adb | 18803 Original_Type : Entity_Id; variable 18847 Original_Type := Scope (Original_Comp); 18853 if not Is_Tagged_Type (Original_Type) then 18879 (not Has_Unknown_Discriminants (Original_Type) 18894 if not Is_Tagged_Type (Original_Type) 18895 or else not Is_Private_Type (Original_Type) 18934 elsif Is_Private_Type (Original_Type) 18938 and then Has_Private_Declaration (Original_Type)) 18981 if Ancestor = Original_Type then 18988 elsif In_Private_Part (Scope (Original_Type)) [all …]
|
/dports/lang/gcc9-devel/gcc-9-20211007/gcc/ada/ |
H A D | sem_ch3.adb | 18803 Original_Type : Entity_Id; variable 18847 Original_Type := Scope (Original_Comp); 18853 if not Is_Tagged_Type (Original_Type) then 18879 (not Has_Unknown_Discriminants (Original_Type) 18894 if not Is_Tagged_Type (Original_Type) 18895 or else not Is_Private_Type (Original_Type) 18934 elsif Is_Private_Type (Original_Type) 18938 and then Has_Private_Declaration (Original_Type)) 18981 if Ancestor = Original_Type then 18988 elsif In_Private_Part (Scope (Original_Type)) [all …]
|
/dports/lang/gnat_util/gcc-6-20180516/gcc/ada/ |
H A D | sem_ch3.adb | 17826 Original_Type : Entity_Id; variable 17870 Original_Type := Scope (Original_Comp); 17876 if not Is_Tagged_Type (Original_Type) then 17890 (not Has_Unknown_Discriminants (Original_Type) 17918 elsif Is_Private_Type (Original_Type) 17922 and then Has_Private_Declaration (Original_Type)) 17942 and then In_Open_Scopes (Scope (Original_Type)) 17965 if Ancestor = Original_Type then 17972 elsif In_Private_Part (Scope (Original_Type)) 17973 and then Full_View (Ancestor) = Original_Type
|
/dports/lang/gcc6-aux/gcc-6-20180516/gcc/ada/ |
H A D | sem_ch3.adb | 17826 Original_Type : Entity_Id; variable 17870 Original_Type := Scope (Original_Comp); 17876 if not Is_Tagged_Type (Original_Type) then 17890 (not Has_Unknown_Discriminants (Original_Type) 17918 elsif Is_Private_Type (Original_Type) 17922 and then Has_Private_Declaration (Original_Type)) 17942 and then In_Open_Scopes (Scope (Original_Type)) 17965 if Ancestor = Original_Type then 17972 elsif In_Private_Part (Scope (Original_Type)) 17973 and then Full_View (Ancestor) = Original_Type
|
/dports/lang/gcc11-devel/gcc-11-20211009/gcc/ada/ |
H A D | sem_ch3.adb | 18917 Original_Type : Entity_Id; variable 18961 Original_Type := Scope (Original_Comp); 18967 if not Is_Tagged_Type (Original_Type) then 18993 (not Has_Unknown_Discriminants (Original_Type) 19017 elsif Is_Private_Type (Original_Type) 19021 and then Has_Private_Declaration (Original_Type) 19042 and then In_Open_Scopes (Scope (Original_Type)) 19065 if Ancestor = Original_Type then 19072 elsif In_Private_Part (Scope (Original_Type)) 19073 and then Full_View (Ancestor) = Original_Type
|
/dports/lang/gcc12-devel/gcc-12-20211205/gcc/ada/ |
H A D | sem_ch3.adb | 19344 Original_Type : Entity_Id; variable 19375 Original_Type := Scope (Original_Comp); 19381 if not Is_Tagged_Type (Original_Type) then 19407 (not Has_Unknown_Discriminants (Original_Type) 19431 elsif Is_Private_Type (Original_Type) 19435 and then Has_Private_Declaration (Original_Type) 19456 and then In_Open_Scopes (Scope (Original_Type)) 19479 if Ancestor = Original_Type then 19486 elsif In_Private_Part (Scope (Original_Type)) 19487 and then Full_View (Ancestor) = Original_Type
|
/dports/lang/gcc11/gcc-11.2.0/gcc/ada/ |
H A D | sem_ch3.adb | 18917 Original_Type : Entity_Id; variable 18961 Original_Type := Scope (Original_Comp); 18967 if not Is_Tagged_Type (Original_Type) then 18993 (not Has_Unknown_Discriminants (Original_Type) 19017 elsif Is_Private_Type (Original_Type) 19021 and then Has_Private_Declaration (Original_Type) 19042 and then In_Open_Scopes (Scope (Original_Type)) 19065 if Ancestor = Original_Type then 19072 elsif In_Private_Part (Scope (Original_Type)) 19073 and then Full_View (Ancestor) = Original_Type
|
/dports/misc/cxx_atomics_pic/gcc-11.2.0/gcc/ada/ |
H A D | sem_ch3.adb | 18917 Original_Type : Entity_Id; variable 18961 Original_Type := Scope (Original_Comp); 18967 if not Is_Tagged_Type (Original_Type) then 18993 (not Has_Unknown_Discriminants (Original_Type) 19017 elsif Is_Private_Type (Original_Type) 19021 and then Has_Private_Declaration (Original_Type) 19042 and then In_Open_Scopes (Scope (Original_Type)) 19065 if Ancestor = Original_Type then 19072 elsif In_Private_Part (Scope (Original_Type)) 19073 and then Full_View (Ancestor) = Original_Type
|