diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2011-08-29 10:25:10 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2011-08-29 10:25:10 +0000 |
| commit | 89cc7147fbacb5e850051c7996fe510d4379253d (patch) | |
| tree | 7231c914b20a6192d1398f725c6a779419140c9a /gcc/ada/a-cbmutr.ads | |
| parent | 01f9c5cd4a1212826adc7a906db50bd93df8c8cd (diff) | |
| download | gcc-89cc7147fbacb5e850051c7996fe510d4379253d.tar.gz | |
2011-08-29 Ed Schonberg <schonberg@adacore.com>
* sem_ch13.adb: Additional semantic checks for aspects involved in
iterators.
2011-08-29 Matthew Heaney <heaney@adacore.com>
* a-comutr.ads, a-comutr.adb, a-cimutr.ads, a-cimutr.adb,
a-cbmutr.ads, a-cbmutr.adb (Find_In_Subtree): Remove superfluous
Container parameter.
(Ancestor_Find): ditto.
2011-08-29 Robert Dewar <dewar@adacore.com>
* par-endh.adb: Minor reformatting.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@178190 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/a-cbmutr.ads')
| -rw-r--r-- | gcc/ada/a-cbmutr.ads | 38 |
1 files changed, 26 insertions, 12 deletions
diff --git a/gcc/ada/a-cbmutr.ads b/gcc/ada/a-cbmutr.ads index b62e67fe308..818cde28a1c 100644 --- a/gcc/ada/a-cbmutr.ads +++ b/gcc/ada/a-cbmutr.ads @@ -113,22 +113,36 @@ package Ada.Containers.Bounded_Multiway_Trees is Item : Element_Type) return Cursor; -- This version of the AI: - - -- 10-06-02 AI05-0136-1/07 - - -- declares Find_In_Subtree with a Container parameter, but this seems - -- incorrect. We need a ruling from the ARG about whether this really was - -- intended. ??? + -- 10-06-02 AI05-0136-1/07 + -- declares Find_In_Subtree this way: + -- + -- function Find_In_Subtree + -- (Container : Tree; + -- Item : Element_Type; + -- Position : Cursor) return Cursor; + -- + -- It seems that the Container parameter is there by mistake, but we need + -- an official ruling from the ARG. ??? function Find_In_Subtree - (Container : Tree; - Item : Element_Type; - Position : Cursor) return Cursor; + (Position : Cursor; + Item : Element_Type) return Cursor; + + -- This version of the AI: + -- 10-06-02 AI05-0136-1/07 + -- declares Ancestor_Find this way: + -- + -- function Ancestor_Find + -- (Container : Tree; + -- Item : Element_Type; + -- Position : Cursor) return Cursor; + -- + -- It seems that the Container parameter is there by mistake, but we need + -- an official ruling from the ARG. ??? function Ancestor_Find - (Container : Tree; - Item : Element_Type; - Position : Cursor) return Cursor; + (Position : Cursor; + Item : Element_Type) return Cursor; function Contains (Container : Tree; |