/dports/devel/riscv64-none-elf-gcc/gcc-8.4.0/gcc/ada/ |
H A D | gnatchop.adb | 702 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 D | gnatchop.adb | 702 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 D | gnatchop.adb | 704 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 D | gnatchop.adb | 704 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 D | gnatchop.adb | 704 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 D | gprlib.adb | 747 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 D | gpr-ali.adb | 651 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 D | gpr-util.adb | 677 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 D | gnatls.adb | 252 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 D | ali.adb | 537 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 D | gnatls.adb | 252 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 D | ali.adb | 537 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 D | metrics-coupling.adb | 66 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 D | gnatls.adb | 298 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 D | prj-util.adb | 448 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 D | gnatls.adb | 285 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 D | prj-util.adb | 446 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 D | gnatls.adb | 285 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 D | prj-util.adb | 446 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 D | gnatls.adb | 285 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 D | prj-util.adb | 446 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 D | gnatls.adb | 298 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 D | prj-util.adb | 448 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 D | prj-util.adb | 448 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 D | gnatls.adb | 339 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
|