diff options
| author | Bob Duff <duff@adacore.com> | 2020-12-03 12:40:05 -0500 |
|---|---|---|
| committer | Pierre-Marie de Rodat <derodat@adacore.com> | 2020-12-17 05:49:23 -0500 |
| commit | 3e05da6849f5548db51ffa15030b1fc8aacb8d9c (patch) | |
| tree | b3aeb7ef83784fe171a9a22f159d42525d4adf9c /gcc/ada/libgnat/a-cidlli.adb | |
| parent | b7e68e7de0fb6dfc9099a333f800dc904eb3c9e7 (diff) | |
| download | gcc-3e05da6849f5548db51ffa15030b1fc8aacb8d9c.zip gcc-3e05da6849f5548db51ffa15030b1fc8aacb8d9c.tar.gz gcc-3e05da6849f5548db51ffa15030b1fc8aacb8d9c.tar.bz2 | |
[Ada] Ada2020: AI12-0400 Ambiguities associated with Vector
gcc/ada/
* libgnat/a-cbdlli.adb, libgnat/a-cbdlli.ads,
libgnat/a-cdlili.adb, libgnat/a-cdlili.ads,
libgnat/a-cidlli.adb, libgnat/a-cidlli.ads,
libgnat/a-cobove.adb, libgnat/a-cobove.ads,
libgnat/a-coinve.adb, libgnat/a-coinve.ads,
libgnat/a-convec.adb, libgnat/a-convec.ads: Add *_Vector
operations, remove default for Count, rename Append_One to be
Append.
Diffstat (limited to 'gcc/ada/libgnat/a-cidlli.adb')
| -rw-r--r-- | gcc/ada/libgnat/a-cidlli.adb | 10 |
1 files changed, 3 insertions, 7 deletions
diff --git a/gcc/ada/libgnat/a-cidlli.adb b/gcc/ada/libgnat/a-cidlli.adb index a62338f..79df5a9 100644 --- a/gcc/ada/libgnat/a-cidlli.adb +++ b/gcc/ada/libgnat/a-cidlli.adb @@ -179,23 +179,19 @@ is procedure Append (Container : in out List; New_Item : Element_Type; - Count : Count_Type := 1) + Count : Count_Type) is begin Insert (Container, No_Element, New_Item, Count); end Append; - --------------- - -- Append_One -- - --------------- - - procedure Append_One + procedure Append (Container : in out List; New_Item : Element_Type) is begin Insert (Container, No_Element, New_Item, 1); - end Append_One; + end Append; ------------ -- Assign -- |