From: charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>
Date: Wed, 22 Jun 2016 09:55:54 +0000 (+0000)
Subject: Minor reformatting.
X-Git-Url: http://git.ipfire.org/gitweb.cgi?a=commitdiff_plain;h=08619e68f6971efc3736300609c0ff18d4807e7d;p=thirdparty%2Fgcc.git

Minor reformatting.


git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@237686 138bc75d-0d04-0410-961f-82ee72b054a4
---

diff --git a/gcc/ada/sem_prag.adb b/gcc/ada/sem_prag.adb
index bb35ac49c20b..b856badbf921 100644
--- a/gcc/ada/sem_prag.adb
+++ b/gcc/ada/sem_prag.adb
@@ -26348,8 +26348,8 @@ package body Sem_Prag is
                Rewrite (N, New_Occurrence_Of (New_E, Sloc (N)));
             end if;
 
-            --  Check that there are no calls left to abstract operations
-            --  if the current subprogram is not abstract.
+            --  Check that there are no calls left to abstract operations if
+            --  the current subprogram is not abstract.
 
             if Nkind (Parent (N)) = N_Function_Call
               and then N = Name (Parent (N))
@@ -27168,8 +27168,9 @@ package body Sem_Prag is
                end if;
 
                New_Prag :=
-                 Build_Pragma_Check_Equivalent (Prag, Subp, Parent_Subp,
-                                                Keep_Pragma_Id => True);
+                 Build_Pragma_Check_Equivalent
+                   (Prag, Subp, Parent_Subp, Keep_Pragma_Id => True);
+
                Insert_After (Unit_Declaration_Node (Subp), New_Prag);
                Preanalyze (New_Prag);