diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index 36fd824ec04..d51b3832166 100644
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
@@ -1,3 +1,7 @@
+2011-09-06  Vadim Godunko  <godunko@adacore.com>
+
+	* a-convec.ads, a-iteint.ads: Minor reformatting.
+
 2011-09-06  Vincent Celier  <celier@adacore.com>
 
 	* projects.texi: Add menus and @node lines.
diff --git a/gcc/ada/a-convec.ads b/gcc/ada/a-convec.ads
index e2532f85803..c6815d31ebb 100644
--- a/gcc/ada/a-convec.ads
+++ b/gcc/ada/a-convec.ads
@@ -358,7 +358,7 @@ package Ada.Containers.Vectors is
       return Vector_Iterator_Interfaces.Reversible_Iterator'Class;
 
    function Iterate (Container : Vector; Start : Cursor)
-      return Vector_Iterator_Interfaces.Reversible_Iterator'class;
+      return Vector_Iterator_Interfaces.Reversible_Iterator'Class;
 
    generic
       with function "<" (Left, Right : Element_Type) return Boolean is <>;
diff --git a/gcc/ada/a-iteint.ads b/gcc/ada/a-iteint.ads
index f0e1659c531..77a6c254d08 100644
--- a/gcc/ada/a-iteint.ads
+++ b/gcc/ada/a-iteint.ads
@@ -26,8 +26,8 @@ package Ada.Iterator_Interfaces is
    function Next
      (Object   : Forward_Iterator;
       Position : Cursor) return Cursor is abstract;
-   type Reversible_Iterator is limited interface and Forward_Iterator;
 
+   type Reversible_Iterator is limited interface and Forward_Iterator;
    function Last (Object : Reversible_Iterator) return Cursor is abstract;
    function Previous
      (Object   : Reversible_Iterator;