2010-04-06 Matthias Klose <doko@ubuntu.com>

[pf3gnuchains/gcc-fork.git] / gcc / ada / g-dynhta.ads

diff --git a/gcc/ada/g-dynhta.ads b/gcc/ada/g-dynhta.ads
index 9486ab1..f679d10 100644 (file)
--- a/gcc/ada/g-dynhta.ads
+++ b/gcc/ada/g-dynhta.ads
@@ -6,7 +6,7 @@
 --                                                                          --
 --                                 S p e c                                  --
 --                                                                          --
---                     Copyright (C) 1995-2005 AdaCore                      --
+--                     Copyright (C) 1995-2008, 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- --
@@ -16,8 +16,8 @@
 -- or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License --
 -- for  more details.  You should have  received  a copy of the GNU General --
 -- Public License  distributed with GNAT;  see file COPYING.  If not, write --
--- to  the Free Software Foundation,  59 Temple Place - Suite 330,  Boston, --
--- MA 02111-1307, USA.                                                      --
+-- to  the  Free Software Foundation,  51  Franklin  Street,  Fifth  Floor, --
+-- Boston, MA 02110-1301, USA.                                              --
 --                                                                          --
 -- As a special exception,  if other files  instantiate  generics from this --
 -- unit, or you link  this unit with other files  to produce an executable, --
@@ -75,7 +75,7 @@ package GNAT.Dynamic_HTables is
 
    generic
       type Header_Num is range <>;
-      --  An integer type indicating the number and range of hash headers.
+      --  An integer type indicating the number and range of hash headers
 
       type Element (<>) is limited private;
       --  The type of element to be stored
@@ -85,7 +85,7 @@ package GNAT.Dynamic_HTables is
       --  type, but could be some other form of type such as an integer type).
 
       Null_Ptr : Elmt_Ptr;
-      --  The null value of the Elmt_Ptr type.
+      --  The null value of the Elmt_Ptr type
 
       with procedure Set_Next (E : Elmt_Ptr; Next : Elmt_Ptr);
       with function  Next     (E : Elmt_Ptr) return Elmt_Ptr;
@@ -130,7 +130,7 @@ package GNAT.Dynamic_HTables is
       function Get_Next (T : Instance) return Elmt_Ptr;
       --  Returns a non-specified element that has not been returned by the
       --  same function since the last call to Get_First or Null_Ptr if
-      --  there is no such element or Get_First has bever been called. If
+      --  there is no such element or Get_First has never been called. If
       --  there is no call to 'Set' in between Get_Next calls, all the
       --  elements of the Htable will be traversed.
 
@@ -154,7 +154,7 @@ package GNAT.Dynamic_HTables is
 
    generic
       type Header_Num is range <>;
-      --  An integer type indicating the number and range of hash headers.
+      --  An integer type indicating the number and range of hash headers
 
       type Element is private;
       --  The type of element to be stored