From: Robert Dewar Date: Tue, 5 Aug 2008 09:39:05 +0000 (+0200) Subject: sem_ch3.adb: Minor reformatting X-Git-Tag: releases/gcc-4.4.0~3360 X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=45a9255f9e5fb2fc7c64f5d6d9c3c8829cb3b5f8;p=thirdparty%2Fgcc.git sem_ch3.adb: Minor reformatting 2008-08-05 Robert Dewar * sem_ch3.adb: Minor reformatting From-SVN: r138695 --- diff --git a/gcc/ada/sem_ch3.adb b/gcc/ada/sem_ch3.adb index cf31e49d5459..3720b3b7643e 100644 --- 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);