diff options
author | Thomas Quinot <quinot@adacore.com> | 2008-07-31 12:25:50 +0200 |
---|---|---|
committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2008-07-31 12:25:50 +0200 |
commit | c969c5cac3e72e4ffc6915d918d31d97512098eb (patch) | |
tree | e59199ce3a1b918e29b157459498119993db54ec | |
parent | b4205ab59dcb147539230061c81f9c3f904c7a34 (diff) | |
download | gcc-c969c5cac3e72e4ffc6915d918d31d97512098eb.zip gcc-c969c5cac3e72e4ffc6915d918d31d97512098eb.tar.gz gcc-c969c5cac3e72e4ffc6915d918d31d97512098eb.tar.bz2 |
g-pehage.adb: Minor reformatting
2008-07-31 Thomas Quinot <quinot@adacore.com>
* g-pehage.adb: Minor reformatting
From-SVN: r138379
-rw-r--r-- | gcc/ada/g-pehage.adb | 11 |
1 files changed, 5 insertions, 6 deletions
diff --git a/gcc/ada/g-pehage.adb b/gcc/ada/g-pehage.adb index 7707094..129cecc 100644 --- a/gcc/ada/g-pehage.adb +++ b/gcc/ada/g-pehage.adb @@ -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)); |