diff options
-rw-r--r-- | gcc/ada/ChangeLog | 4 | ||||
-rw-r--r-- | gcc/ada/g-htable.ads | 6 | ||||
-rw-r--r-- | gcc/ada/s-htable.ads | 6 |
3 files changed, 10 insertions, 6 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index c50487b..d8fa823 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,5 +1,9 @@ 2009-07-15 Robert Dewar <dewar@adacore.com> + * g-htable.ads, s-htable.ads: Minor reformatting + +2009-07-15 Robert Dewar <dewar@adacore.com> + * switch-c.adb, sem_ch10.adb, sem_warn.adb, sem_warn.ads: Implement new switch -gnatw.g. (Set_GNAT_Mode_Warnings): New procedure. diff --git a/gcc/ada/g-htable.ads b/gcc/ada/g-htable.ads index a158d09..e747637 100644 --- a/gcc/ada/g-htable.ads +++ b/gcc/ada/g-htable.ads @@ -6,7 +6,7 @@ -- -- -- S p e c -- -- -- --- Copyright (C) 1995-2008, AdaCore -- +-- Copyright (C) 1995-2009, AdaCore -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- -- terms of the GNU General Public License as published by the Free Soft- -- @@ -103,7 +103,7 @@ package GNAT.HTable is -- function Get_First return Element; -- -- Returns No_Element if the HTable is empty, otherwise returns one - -- -- non specified element. There is no guarantee that 2 calls to + -- -- non specified element. There is no guarantee that two calls to -- -- this function will return the same element. -- function Get_Next return Element; @@ -188,7 +188,7 @@ package GNAT.HTable is -- function Get_First return Elmt_Ptr; -- -- Returns Null_Ptr if the HTable is empty, otherwise returns one - -- -- non specified element. There is no guarantee that 2 calls to + -- -- non specified element. There is no guarantee that two calls to -- -- this function will return the same element. -- function Get_Next return Elmt_Ptr; diff --git a/gcc/ada/s-htable.ads b/gcc/ada/s-htable.ads index bc416ab..fc97cf4 100644 --- a/gcc/ada/s-htable.ads +++ b/gcc/ada/s-htable.ads @@ -6,7 +6,7 @@ -- -- -- S p e c -- -- -- --- Copyright (C) 1995-2008, AdaCore -- +-- Copyright (C) 1995-2009, AdaCore -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- -- terms of the GNU General Public License as published by the Free Soft- -- @@ -88,7 +88,7 @@ package System.HTable is function Get_First return Element; -- Returns No_Element if the HTable is empty, otherwise returns one - -- non specified element. There is no guarantee that 2 calls to this + -- non specified element. There is no guarantee that two calls to this -- function will return the same element. function Get_Next return Element; @@ -175,7 +175,7 @@ package System.HTable is function Get_First return Elmt_Ptr; -- Returns Null_Ptr if the HTable is empty, otherwise returns one - -- non specified element. There is no guarantee that 2 calls to this + -- non specified element. There is no guarantee that two calls to this -- function will return the same element. function Get_Next return Elmt_Ptr; |