From: Arnaud Charlet <charlet@gcc.gnu.org>
Date: Thu, 29 May 2008 08:05:54 +0000 (+0200)
Subject: * sem_ch3.adb: Minor reformatting
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=10619438e6edc0ee0511a04aba1f07a51841dec2;p=gcc.git

* sem_ch3.adb: Minor reformatting

From-SVN: r136139
---

diff --git a/gcc/ada/sem_ch3.adb b/gcc/ada/sem_ch3.adb
index 88a44138039..f0065b73901 100644
--- a/gcc/ada/sem_ch3.adb
+++ b/gcc/ada/sem_ch3.adb
@@ -6285,14 +6285,13 @@ package body Sem_Ch3 is
                   C1 := First_Elmt (New_Discrs);
                   C2 := First_Elmt (Discriminant_Constraint (Derived_Type));
                   while Present (C1) and then Present (C2) loop
-
                      if Fully_Conformant_Expressions (Node (C1), Node (C2))
                        or else
-                     (Is_OK_Static_Expression (Node (C1))
-                        and then
-                      Is_OK_Static_Expression (Node (C2))
-                        and then
-                      Expr_Value (Node (C1)) = Expr_Value (Node (C2)))
+                         (Is_OK_Static_Expression (Node (C1))
+                            and then
+                          Is_OK_Static_Expression (Node (C2))
+                            and then
+                          Expr_Value (Node (C1)) = Expr_Value (Node (C2)))
                      then
                         null;