From 45a9255f9e5fb2fc7c64f5d6d9c3c8829cb3b5f8 Mon Sep 17 00:00:00 2001 From: Robert Dewar Date: Tue, 5 Aug 2008 11:39:05 +0200 Subject: [PATCH] sem_ch3.adb: Minor reformatting 2008-08-05 Robert Dewar * sem_ch3.adb: Minor reformatting From-SVN: r138695 --- gcc/ada/sem_ch3.adb | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) 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); -- 2.47.2