Minor reformatting.

From-SVN: r244784

diff --git a/gcc/ada/sem_aggr.adb b/gcc/ada/sem_aggr.adb
index 80873180e1e7cd404b6037ebb163893ba2849f49..6ca9d181b3d575b66fe359aa96f6c65ba5391c19 100644 (file)
--- 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 e1b73538b5400b9d17f577868b370904079d1da4..9cc64b31725970e02b69e40801725a318ecdad82 100644 (file)
--- 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);