diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index 2cec51cf450ec3b9a55ec2eeeb09f43587a8c9f7..acc417cf620bc219465b7f1757313c5e0501f485 100644
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
@@ -1,3 +1,7 @@
+2010-10-19  Thomas Quinot  <quinot@adacore.com>
+
+	* einfo.ads, atree.ads: Minor comment fixes.
+
 2010-10-18  Bob Duff  <duff@adacore.com>
 
 	* sinfo.ads, sinfo.adb: Modify comment about adding fields to be more
diff --git a/gcc/ada/atree.ads b/gcc/ada/atree.ads
index a40c192c361c3c00b0966e9b9aee61c498814155..06e06de3b21e6cc57747dfda41170a19a10aab66 100644
--- a/gcc/ada/atree.ads
+++ b/gcc/ada/atree.ads
@@ -277,7 +277,7 @@ package Atree is
 
    --  Field1-5 fields are set to Empty
 
-   --  Field6-22 fields in extended nodes are set to Empty
+   --  Field6-29 fields in extended nodes are set to Empty
 
    --  Parent is set to Empty
 
diff --git a/gcc/ada/einfo.ads b/gcc/ada/einfo.ads
index 2822ac217c160150af732780b7cae79a5a497fdc..6accd05c9a00fcc73c9c167f198bd2099df5cff4 100644
--- a/gcc/ada/einfo.ads
+++ b/gcc/ada/einfo.ads
@@ -1250,7 +1250,7 @@ package Einfo is
 --          Alignment attribute definition clause
 --          Machine_Attribute pragma
 --          Link_Alias pragma
---          Link-Section pragma
+--          Linker_Section pragma
 --          Weak_External pragma
 --
 --       If any of these items are present, then the flag Has_Gigi_Rep_Item
@@ -4703,6 +4703,7 @@ package Einfo is
    --    RM_Size                             (Uint13)
    --    Alignment                           (Uint14)
    --    Related_Expression                  (Node24)
+   --    Current_Use_Clause                  (Node27)
 
    --    Depends_On_Private                  (Flag14)
    --    Discard_Names                       (Flag88)