]> git.ipfire.org Git - thirdparty/gcc.git/commitdiff
g-pehage.adb: Minor reformatting
authorThomas Quinot <quinot@adacore.com>
Thu, 31 Jul 2008 10:25:50 +0000 (12:25 +0200)
committerArnaud Charlet <charlet@gcc.gnu.org>
Thu, 31 Jul 2008 10:25:50 +0000 (12:25 +0200)
2008-07-31  Thomas Quinot  <quinot@adacore.com>

* g-pehage.adb: Minor reformatting

From-SVN: r138379

gcc/ada/g-pehage.adb

index 770709470019cbcaccc821a70029fecf765ebaba..129cecc7659936aeff6c2127a82ce45d8cb42917 100644 (file)
@@ -591,7 +591,7 @@ package body GNAT.Perfect_Hash_Generators is
    --  Start of processing for Assign_Values_To_Vertices
 
    begin
-      --  Value -1 denotes an unitialized value as it is supposed to
+      --  Value -1 denotes an uninitialized value as it is supposed to
       --  be in the range 0 .. NK.
 
       if G = No_Table then
@@ -1141,11 +1141,10 @@ package body GNAT.Perfect_Hash_Generators is
       Tries  : Positive     := Default_Tries)
    is
    begin
-      --  Deallocated the part of the table concerning the reduced
-      --  words. Initial words are already present in the table. We
-      --  may have reduced words already there because a previous
-      --  computation failed. We are currently retrying and the
-      --  reduced words have to be deallocated.
+      --  Deallocate the part of the table concerning the reduced words.
+      --  Initial words are already present in the table. We may have reduced
+      --  words already there because a previous computation failed. We are
+      --  currently retrying and the reduced words have to be deallocated.
 
       for W in NK .. WT.Last loop
          Free_Word (WT.Table (W));