/dports/lang/gnat_util/gnat_util/ |
H A D | table.adb | 135 Old_Length : constant Int := Length; constant 148 if Old_Length = Length then
|
/dports/lang/gcc12-devel/gcc-12-20211205/gcc/ada/libgnat/ |
H A D | a-cfinve.adb | 917 Old_Length : constant Count_Type := Length (Container); constant 968 if Old_Length > Count_Type'Last - Count then 975 New_Length := Old_Length + Count; 1104 EA (J + Count .. New_Length) := EA (J .. Old_Length);
|
H A D | a-cobove.adb | 1047 Old_Length : constant Count_Type := Container.Length; constant 1106 if Checks and then Old_Length > Count_Type'Last - Count then 1113 New_Length := Old_Length + Count; 1237 EA (J + Count .. New_Length) := EA (J .. Old_Length); 1517 Old_Length : constant Count_Type := Container.Length; constant 1576 if Checks and then Old_Length > Count_Type'Last - Count then 1583 New_Length := Old_Length + Count; 1706 EA (J + Count .. New_Length) := EA (J .. Old_Length);
|
H A D | a-cofove.adb | 810 Old_Length : constant Count_Type := Length (Container); constant 861 if Old_Length > Count_Type'Last - Count then 868 New_Length := Old_Length + Count; 991 EA (J + Count .. New_Length) := EA (J .. Old_Length);
|
H A D | a-convec.adb | 961 Old_Length : constant Count_Type := Container.Length; constant 1025 if Checks and then Old_Length > Count_Type'Last - Count then 1032 New_Length := Old_Length + Count; 1623 Old_Length : constant Count_Type := Container.Length; constant 1687 if Checks and then Old_Length > Count_Type'Last - Count then 1694 New_Length := Old_Length + Count;
|
H A D | a-coinve.adb | 1152 Old_Length : constant Count_Type := Container.Length; constant 1216 if Checks and then Old_Length > Count_Type'Last - Count then 1223 New_Length := Old_Length + Count; 1932 Old_Length : constant Count_Type := Container.Length; constant 1996 if Checks and then Old_Length > Count_Type'Last - Count then 2003 New_Length := Old_Length + Count;
|
/dports/lang/gcc12-devel/gcc-12-20211205/gcc/ada/ |
H A D | table.adb | 126 Old_Length : constant Int := Length; constant 139 if Old_Length = Length then
|
/dports/lang/gcc11-devel/gcc-11-20211009/gcc/ada/libgnat/ |
H A D | a-cofove.adb | 794 Old_Length : constant Count_Type := Length (Container); constant 845 if Old_Length > Count_Type'Last - Count then 852 New_Length := Old_Length + Count; 979 EA (J + Count .. New_Length) := EA (J .. Old_Length);
|
H A D | a-cfinve.adb | 895 Old_Length : constant Count_Type := Length (Container); constant 946 if Old_Length > Count_Type'Last - Count then 953 New_Length := Old_Length + Count; 1082 EA (J + Count .. New_Length) := EA (J .. Old_Length);
|
H A D | a-cobove.adb | 1047 Old_Length : constant Count_Type := Container.Length; constant 1106 if Checks and then Old_Length > Count_Type'Last - Count then 1113 New_Length := Old_Length + Count; 1237 EA (J + Count .. New_Length) := EA (J .. Old_Length); 1517 Old_Length : constant Count_Type := Container.Length; constant 1576 if Checks and then Old_Length > Count_Type'Last - Count then 1583 New_Length := Old_Length + Count; 1706 EA (J + Count .. New_Length) := EA (J .. Old_Length);
|
H A D | a-coinve.adb | 1152 Old_Length : constant Count_Type := Container.Length; constant 1216 if Checks and then Old_Length > Count_Type'Last - Count then 1223 New_Length := Old_Length + Count; 1932 Old_Length : constant Count_Type := Container.Length; constant 1996 if Checks and then Old_Length > Count_Type'Last - Count then 2003 New_Length := Old_Length + Count;
|
H A D | a-convec.adb | 961 Old_Length : constant Count_Type := Container.Length; constant 1025 if Checks and then Old_Length > Count_Type'Last - Count then 1032 New_Length := Old_Length + Count; 1623 Old_Length : constant Count_Type := Container.Length; constant 1687 if Checks and then Old_Length > Count_Type'Last - Count then 1694 New_Length := Old_Length + Count;
|
/dports/lang/gcc11-devel/gcc-11-20211009/gcc/ada/ |
H A D | table.adb | 126 Old_Length : constant Int := Length; constant 139 if Old_Length = Length then
|
/dports/lang/gcc10-devel/gcc-10-20211008/gcc/ada/libgnat/ |
H A D | a-cofove.adb | 794 Old_Length : constant Count_Type := Length (Container); constant 845 if Old_Length > Count_Type'Last - Count then 852 New_Length := Old_Length + Count; 969 EA (J + Count .. New_Length) := EA (J .. Old_Length);
|
H A D | a-cfinve.adb | 895 Old_Length : constant Count_Type := Length (Container); constant 946 if Old_Length > Count_Type'Last - Count then 953 New_Length := Old_Length + Count; 1082 EA (J + Count .. New_Length) := EA (J .. Old_Length);
|
H A D | a-convec.adb | 922 Old_Length : constant Count_Type := Container.Length; constant 978 if Checks and then Old_Length > Count_Type'Last - Count then 985 New_Length := Old_Length + Count; 1584 Old_Length : constant Count_Type := Container.Length; constant 1640 if Checks and then Old_Length > Count_Type'Last - Count then 1647 New_Length := Old_Length + Count;
|
H A D | a-cobove.adb | 1015 Old_Length : constant Count_Type := Container.Length; constant 1066 if Checks and then Old_Length > Count_Type'Last - Count then 1073 New_Length := Old_Length + Count; 1205 EA (J + Count .. New_Length) := EA (J .. Old_Length); 1485 Old_Length : constant Count_Type := Container.Length; constant 1536 if Checks and then Old_Length > Count_Type'Last - Count then 1543 New_Length := Old_Length + Count; 1674 EA (J + Count .. New_Length) := EA (J .. Old_Length);
|
H A D | a-coinve.adb | 1117 Old_Length : constant Count_Type := Container.Length; constant 1173 if Checks and then Old_Length > Count_Type'Last - Count then 1180 New_Length := Old_Length + Count; 1897 Old_Length : constant Count_Type := Container.Length; constant 1953 if Checks and then Old_Length > Count_Type'Last - Count then 1960 New_Length := Old_Length + Count;
|
/dports/lang/gcc10-devel/gcc-10-20211008/gcc/ada/ |
H A D | table.adb | 137 Old_Length : constant Int := Length; constant 150 if Old_Length = Length then
|
/dports/lang/gcc9-devel/gcc-9-20211007/gcc/ada/ |
H A D | table.adb | 135 Old_Length : constant Int := Length; constant 148 if Old_Length = Length then
|
/dports/lang/gcc9-devel/gcc-9-20211007/gcc/ada/libgnat/ |
H A D | a-cobove.adb | 1021 Old_Length : constant Count_Type := Container.Length; constant 1072 if Checks and then Old_Length > Count_Type'Last - Count then 1079 New_Length := Old_Length + Count; 1211 EA (J + Count .. New_Length) := EA (J .. Old_Length); 1491 Old_Length : constant Count_Type := Container.Length; constant 1542 if Checks and then Old_Length > Count_Type'Last - Count then 1549 New_Length := Old_Length + Count; 1680 EA (J + Count .. New_Length) := EA (J .. Old_Length);
|
H A D | a-coinve.adb | 1117 Old_Length : constant Count_Type := Container.Length; constant 1173 if Checks and then Old_Length > Count_Type'Last - Count then 1180 New_Length := Old_Length + Count; 1897 Old_Length : constant Count_Type := Container.Length; constant 1953 if Checks and then Old_Length > Count_Type'Last - Count then 1960 New_Length := Old_Length + Count;
|
H A D | a-cfinve.adb | 895 Old_Length : constant Count_Type := Length (Container); constant 946 if Old_Length > Count_Type'Last - Count then 953 New_Length := Old_Length + Count; 1082 EA (J + Count .. New_Length) := EA (J .. Old_Length);
|
H A D | a-cofove.adb | 891 Old_Length : constant Count_Type := Length (Container); constant 942 if Old_Length > Count_Type'Last - Count then 949 New_Length := Old_Length + Count; 1077 EA (J + Count .. New_Length) := EA (J .. Old_Length);
|
H A D | a-convec.adb | 922 Old_Length : constant Count_Type := Container.Length; constant 978 if Checks and then Old_Length > Count_Type'Last - Count then 985 New_Length := Old_Length + Count; 1584 Old_Length : constant Count_Type := Container.Length; constant 1640 if Checks and then Old_Length > Count_Type'Last - Count then 1647 New_Length := Old_Length + Count;
|