Home
last modified time | relevance | path

Searched refs:First_Unit (Results 26 – 50 of 286) sorted by relevance

12345678910>>...12

/dports/devel/riscv64-none-elf-gcc/gcc-8.4.0/gcc/ada/
H A Dgnatchop.adb702 First_Unit : constant Unit_Num := Unit.Last + 1; constant
836 if Unit.Last > First_Unit then
845 and then Unit.Last > First_Unit
862 and then Unit.Last = First_Unit + 1
863 and then Unit.Table (First_Unit).Kind = Config_Pragmas
867 (Unit.Table (Unit.Last - 1).Chop_File, First_Unit);
880 and then Unit.Last > First_Unit
902 if Unit.Last = First_Unit
908 Write_Config_File (Unit.Table (Unit.Last).Chop_File, First_Unit);
927 if Unit.Last > First_Unit
/dports/devel/riscv32-unknown-elf-gcc/gcc-8.4.0/gcc/ada/
H A Dgnatchop.adb702 First_Unit : constant Unit_Num := Unit.Last + 1; constant
836 if Unit.Last > First_Unit then
845 and then Unit.Last > First_Unit
862 and then Unit.Last = First_Unit + 1
863 and then Unit.Table (First_Unit).Kind = Config_Pragmas
867 (Unit.Table (Unit.Last - 1).Chop_File, First_Unit);
880 and then Unit.Last > First_Unit
902 if Unit.Last = First_Unit
908 Write_Config_File (Unit.Table (Unit.Last).Chop_File, First_Unit);
927 if Unit.Last > First_Unit
/dports/lang/gcc11/gcc-11.2.0/gcc/ada/
H A Dgnatchop.adb704 First_Unit : constant Unit_Num := Unit.Last + 1; constant
838 if Unit.Last > First_Unit then
847 and then Unit.Last > First_Unit
864 and then Unit.Last = First_Unit + 1
865 and then Unit.Table (First_Unit).Kind = Config_Pragmas
869 (Unit.Table (Unit.Last - 1).Chop_File, First_Unit);
882 and then Unit.Last > First_Unit
904 if Unit.Last = First_Unit
910 Write_Config_File (Unit.Table (Unit.Last).Chop_File, First_Unit);
929 if Unit.Last > First_Unit
/dports/lang/gcc9-aux/gcc-9.1.0/gcc/ada/
H A Dgnatchop.adb704 First_Unit : constant Unit_Num := Unit.Last + 1; constant
838 if Unit.Last > First_Unit then
847 and then Unit.Last > First_Unit
864 and then Unit.Last = First_Unit + 1
865 and then Unit.Table (First_Unit).Kind = Config_Pragmas
869 (Unit.Table (Unit.Last - 1).Chop_File, First_Unit);
882 and then Unit.Last > First_Unit
904 if Unit.Last = First_Unit
910 Write_Config_File (Unit.Table (Unit.Last).Chop_File, First_Unit);
929 if Unit.Last > First_Unit
/dports/lang/gcc9-devel/gcc-9-20211007/gcc/ada/
H A Dgnatchop.adb704 First_Unit : constant Unit_Num := Unit.Last + 1; constant
838 if Unit.Last > First_Unit then
847 and then Unit.Last > First_Unit
864 and then Unit.Last = First_Unit + 1
865 and then Unit.Table (First_Unit).Kind = Config_Pragmas
869 (Unit.Table (Unit.Last - 1).Chop_File, First_Unit);
882 and then Unit.Last > First_Unit
904 if Unit.Last = First_Unit
910 Write_Config_File (Unit.Table (Unit.Last).Chop_File, First_Unit);
929 if Unit.Last > First_Unit
/dports/devel/gprbuild/gprbuild-376670f/src/
H A Dgprlib.adb747 First_Unit : ALI.Unit_Id; variable
804 First_Unit := ALI.ALIs.Table (The_ALI).First_Unit;
809 if ALI.Units.Table (First_Unit).Utype = ALI.Is_Body then
815 First_Unit := ALI.No_Unit_Id;
819 elsif ALI.Units.Table (First_Unit).Utype = ALI.Is_Spec_Only then
825 if First_Unit /= No_Unit_Id then
827 Get_Name_String (ALI.Units.Table (First_Unit).Sfile));
1525 ALI.Units.Table (ALI.ALIs.Table (A).First_Unit).First_Arg ..
1526 ALI.Units.Table (ALI.ALIs.Table (A).First_Unit).Last_Arg
1770 (ALI.ALIs.Table (A).First_Unit).First_Arg ..
[all …]
/dports/devel/gprbuild/gprbuild-376670f/gpr/src/
H A Dgpr-ali.adb651 First_Unit => No_Unit_Id,
817 if ALIs.Table (Id).First_Unit = No_Unit_Id then
818 ALIs.Table (Id).First_Unit := Units.Last;
1191 ALIs.Table (Id).Sfile := Units.Table (ALIs.Table (Id).First_Unit).Sfile;
1195 if ALIs.Table (Id).First_Unit /= ALIs.Table (Id).Last_Unit then
1196 Units.Table (ALIs.Table (Id).First_Unit).Utype := Is_Body;
H A Dgpr-util.adb677 First_Unit : Unit_Id; variable
721 First_Unit := ALIs.Table (ALI).First_Unit;
727 if Units.Table (First_Unit).Utype = Is_Body then
736 elsif Units.Table (First_Unit).Utype = Is_Spec_Only then
1065 First_Unit : Unit_Id; variable
1145 First_Unit := ALI.ALIs.Table (Idread).First_Unit;
1148 for Unit in First_Unit .. Last_Unit loop
1151 if Unit = First_Unit then
/dports/devel/zpu-gcc/zpu-toolchain-1.0/toolchain/gcc/gcc/ada/
H A Dgnatls.adb252 Get_Name_String (Units.Table (ALIs.Table (Id).First_Unit).Uname);
960 Get_Name_String (Units.Table (ALIs.Table (Id).First_Unit).Uname);
971 Last_U := ALIs.Table (Id).First_Unit;
974 for U in ALIs.Table (Id).First_Unit .. Last_U loop
975 if U /= ALIs.Table (Id).First_Unit
H A Dali.adb537 First_Unit => No_Unit_Id,
885 if ALIs.Table (Id).First_Unit = No_Unit_Id then
886 ALIs.Table (Id).First_Unit := Units.Last;
1327 ALIs.Table (Id).Sfile := Units.Table (ALIs.Table (Id).First_Unit).Sfile;
1331 if ALIs.Table (Id).First_Unit /= ALIs.Table (Id).Last_Unit then
1332 Units.Table (ALIs.Table (Id).First_Unit).Utype := Is_Body;
/dports/devel/zpu-binutils/zpu-toolchain-1.0/toolchain/gcc/gcc/ada/
H A Dgnatls.adb252 Get_Name_String (Units.Table (ALIs.Table (Id).First_Unit).Uname);
960 Get_Name_String (Units.Table (ALIs.Table (Id).First_Unit).Uname);
971 Last_U := ALIs.Table (Id).First_Unit;
974 for U in ALIs.Table (Id).First_Unit .. Last_U loop
975 if U /= ALIs.Table (Id).First_Unit
H A Dali.adb537 First_Unit => No_Unit_Id,
885 if ALIs.Table (Id).First_Unit = No_Unit_Id then
886 ALIs.Table (Id).First_Unit := Units.Last;
1327 ALIs.Table (Id).Sfile := Units.Table (ALIs.Table (Id).First_Unit).Sfile;
1331 if ALIs.Table (Id).First_Unit /= ALIs.Table (Id).Last_Unit then
1332 Units.Table (ALIs.Table (Id).First_Unit).Utype := Is_Body;
/dports/lang/asis/asis-gpl-2016-src/tools/gnatmetric/
H A Dmetrics-coupling.adb66 First_Unit : constant Unit_Id := No_Unit + 1; constant
72 subtype Existing_Unit_Id is Unit_Id range First_Unit .. Unit_Id'Last;
807 First_Unit .. Unit_Containers.Last_Index (Unit_Table);
816 return CU_Id in First_Unit .. Unit_Containers.Last_Index (Unit_Table);
904 for J in First_Unit .. Unit_Containers.Last_Index (Unit_Table) loop
1001 for J in First_Unit .. Unit_Containers.Last_Index (Unit_Table) loop
/dports/lang/gnat_util/gcc-6-20180516/gcc/ada/
H A Dgnatls.adb298 Get_Name_String (Units.Table (ALIs.Table (Id).First_Unit).Uname);
539 for U in ALIs.Table (A).First_Unit .. ALIs.Table (A).Last_Unit loop
1858 Get_Name_String (Units.Table (ALIs.Table (Id).First_Unit).Uname);
1873 Last_U := ALIs.Table (Id).First_Unit;
1876 for U in ALIs.Table (Id).First_Unit .. Last_U loop
1877 if U /= ALIs.Table (Id).First_Unit
H A Dprj-util.adb448 First_Unit : Unit_Id; variable
492 First_Unit := ALIs.Table (ALI).First_Unit;
498 if Units.Table (First_Unit).Utype = Is_Body then
507 elsif Units.Table (First_Unit).Utype = Is_Spec_Only then
/dports/lang/gcc48/gcc-4.8.5/gcc/ada/
H A Dgnatls.adb285 Get_Name_String (Units.Table (ALIs.Table (Id).First_Unit).Uname);
526 for U in ALIs.Table (A).First_Unit .. ALIs.Table (A).Last_Unit loop
1769 Get_Name_String (Units.Table (ALIs.Table (Id).First_Unit).Uname);
1784 Last_U := ALIs.Table (Id).First_Unit;
1787 for U in ALIs.Table (Id).First_Unit .. Last_U loop
1788 if U /= ALIs.Table (Id).First_Unit
H A Dprj-util.adb446 First_Unit : Unit_Id; variable
484 First_Unit := ALIs.Table (ALI).First_Unit;
490 if Units.Table (First_Unit).Utype = Is_Body then
499 elsif Units.Table (First_Unit).Utype = Is_Spec_Only then
/dports/devel/mingw32-gcc/gcc-4.8.1/gcc/ada/
H A Dgnatls.adb285 Get_Name_String (Units.Table (ALIs.Table (Id).First_Unit).Uname);
526 for U in ALIs.Table (A).First_Unit .. ALIs.Table (A).Last_Unit loop
1769 Get_Name_String (Units.Table (ALIs.Table (Id).First_Unit).Uname);
1784 Last_U := ALIs.Table (Id).First_Unit;
1787 for U in ALIs.Table (Id).First_Unit .. Last_U loop
1788 if U /= ALIs.Table (Id).First_Unit
H A Dprj-util.adb446 First_Unit : Unit_Id; variable
484 First_Unit := ALIs.Table (ALI).First_Unit;
490 if Units.Table (First_Unit).Utype = Is_Body then
499 elsif Units.Table (First_Unit).Utype = Is_Spec_Only then
/dports/devel/arm-none-eabi-gcc492/gcc-4.9.2/gcc/ada/
H A Dgnatls.adb285 Get_Name_String (Units.Table (ALIs.Table (Id).First_Unit).Uname);
526 for U in ALIs.Table (A).First_Unit .. ALIs.Table (A).Last_Unit loop
1791 Get_Name_String (Units.Table (ALIs.Table (Id).First_Unit).Uname);
1806 Last_U := ALIs.Table (Id).First_Unit;
1809 for U in ALIs.Table (Id).First_Unit .. Last_U loop
1810 if U /= ALIs.Table (Id).First_Unit
H A Dprj-util.adb446 First_Unit : Unit_Id; variable
489 First_Unit := ALIs.Table (ALI).First_Unit;
495 if Units.Table (First_Unit).Utype = Is_Body then
504 elsif Units.Table (First_Unit).Utype = Is_Spec_Only then
/dports/lang/gcc6-aux/gcc-6-20180516/gcc/ada/
H A Dgnatls.adb298 Get_Name_String (Units.Table (ALIs.Table (Id).First_Unit).Uname);
539 for U in ALIs.Table (A).First_Unit .. ALIs.Table (A).Last_Unit loop
1858 Get_Name_String (Units.Table (ALIs.Table (Id).First_Unit).Uname);
1873 Last_U := ALIs.Table (Id).First_Unit;
1876 for U in ALIs.Table (Id).First_Unit .. Last_U loop
1877 if U /= ALIs.Table (Id).First_Unit
H A Dprj-util.adb448 First_Unit : Unit_Id; variable
492 First_Unit := ALIs.Table (ALI).First_Unit;
498 if Units.Table (First_Unit).Utype = Is_Body then
507 elsif Units.Table (First_Unit).Utype = Is_Spec_Only then
/dports/lang/gnat_util/gnat_util/
H A Dprj-util.adb448 First_Unit : Unit_Id; variable
492 First_Unit := ALIs.Table (ALI).First_Unit;
498 if Units.Table (First_Unit).Utype = Is_Body then
507 elsif Units.Table (First_Unit).Utype = Is_Spec_Only then
/dports/devel/aarch64-none-elf-gcc/gcc-8.4.0/gcc/ada/
H A Dgnatls.adb339 Get_Name_String (Units.Table (ALIs.Table (Id).First_Unit).Uname);
580 for U in ALIs.Table (A).First_Unit .. ALIs.Table (A).Last_Unit loop
2310 Get_Name_String (Units.Table (ALIs.Table (Id).First_Unit).Uname);
2325 Last_U := ALIs.Table (Id).First_Unit;
2328 for U in ALIs.Table (Id).First_Unit .. Last_U loop
2329 if U /= ALIs.Table (Id).First_Unit

12345678910>>...12