From: Arnaud Charlet <charlet@gcc.gnu.org>
Date: Mon, 23 Jan 2017 11:29:46 +0000 (+0100)
Subject: Minor reformatting.
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=15e2e3f57e376cd285f50a9a6c92a2712e53e917;p=gcc.git

Minor reformatting.

From-SVN: r244784
---

diff --git a/gcc/ada/sem_aggr.adb b/gcc/ada/sem_aggr.adb
index 80873180e1e..6ca9d181b3d 100644
--- a/gcc/ada/sem_aggr.adb
+++ b/gcc/ada/sem_aggr.adb
@@ -2289,13 +2289,13 @@ package body Sem_Aggr is
 
                               elsif ASIS_Mode
                                 and then
-                                  ((Is_Type (Entity (Table (J).Choice))
-                                    and then Has_Predicates
-                                      (Entity (Table (J).Choice)))
-                                   or else
-                                     (Is_Type (Entity (Table (K).Choice))
+                                   ((Is_Type (Entity (Table (J).Choice))
                                        and then Has_Predicates
-                                          (Entity (Table (K).Choice))))
+                                         (Entity (Table (J).Choice)))
+                                  or else
+                                    (Is_Type (Entity (Table (K).Choice))
+                                       and then Has_Predicates
+                                         (Entity (Table (K).Choice))))
                               then
                                  null;
 
diff --git a/gcc/ada/sem_ch3.adb b/gcc/ada/sem_ch3.adb
index e1b73538b54..9cc64b31725 100644
--- a/gcc/ada/sem_ch3.adb
+++ b/gcc/ada/sem_ch3.adb
@@ -2649,8 +2649,8 @@ package body Sem_Ch3 is
               and then not Is_Generic_Instance (Current_Scope)
             then
                --  Loop through all entities in the current scope to identify
-               --  an instance of the edge-case outlined above and ignore
-               --  freezeing if it is detected.
+               --  an instance of the edge case outlined above and ignore
+               --  freezing if it is detected.
 
                declare
                   Curr : Entity_Id := First_Entity (Current_Scope);