2008-08-05 Robert Dewar <dewar@adacore.com>

	* sem_ch3.adb: Minor reformatting

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@138695 138bc75d-0d04-0410-961f-82ee72b054a4

diff --git a/gcc/ada/sem_ch3.adb b/gcc/ada/sem_ch3.adb
index cf31e49..3720b3b 100644 (file)
--- a/gcc/ada/sem_ch3.adb
+++ b/gcc/ada/sem_ch3.adb
@@ -2550,10 +2550,9 @@ package body Sem_Ch3 is
          Set_Etype (Id, T);
          Resolve (E, T);
 
-         --  If E is "null", and has been replaced by an
-         --  N_Raise_Constraint_Error node (which was marked already-analyzed),
-         --  we need to set the type to something other than Any_Access in
-         --  order to keep gigi happy.
+         --  If E is null and has been replaced by an N_Raise_Constraint_Error
+         --  node (which was marked already-analyzed), we need to set the type
+         --  to something other than Any_Access in order to keep gigi happy.
 
          if Etype (E) = Any_Access then
             Set_Etype (E, T);