diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index 0793113072e..cb3f6ab6862 100644
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
@@ -1,3 +1,7 @@
+2012-10-29  Robert Dewar  <dewar@adacore.com>
+
+	* freeze.adb: Minor reformatting.
+
 2012-10-29  Robert Dewar  <dewar@adacore.com>
 
 	* xr_tabls.adb, xr_tabls.ads, exp_ch9.adb, snames.adb-tmpl,
diff --git a/gcc/ada/freeze.adb b/gcc/ada/freeze.adb
index 9e0cbcacf80..6c647111627 100644
--- a/gcc/ada/freeze.adb
+++ b/gcc/ada/freeze.adb
@@ -4652,7 +4652,7 @@ package body Freeze is
          --  this is where we analye the expression (after the type is frozen,
          --  since in the case of Default_Value, we are analyzing with the
          --  type itself, and we treat Default_Component_Value similarly for
-         --  the sake of uniformity.
+         --  the sake of uniformity).
 
          if Is_First_Subtype (E) and then Has_Default_Aspect (E) then
             declare