[Ada] Minor reformatting

2018-05-25 Justin Squirek <squirek@adacore.com> gcc/ada/ * sem_ch8.adb: Minor reformatting. From-SVN: r260729

[Ada] Minor reformatting
2018-05-25 Justin Squirek <squirek@adacore.com> gcc/ada/ * sem_ch8.adb: Minor reformatting. From-SVN: r260729
f9a0fd0b · Justin Squirek · Pierre-Marie de Rodat · 308ac7f4 · f9a0fd0b · f9a0fd0b
Commit f9a0fd0b authored May 25, 2018 by Justin Squirek Committed by Pierre-Marie de Rodat May 25, 2018
Hide whitespace changes
Inline Side-by-side

Showing with 7 additions and 1 deletions

gcc/ada/ChangeLog
+4 -0

gcc/ada/sem_ch8.adb
+3 -1

No files found.
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
+2018-05-25  Justin Squirek  <squirek@adacore.com>
+
+	* sem_ch8.adb: Minor reformatting.
+
 2018-05-25  Piotr Trojanek  <trojanek@adacore.com>

 	* sem_util.adb (Iterate_Call_Parameters): Fix code convention and

--- a/gcc/ada/sem_ch8.adb
+++ b/gcc/ada/sem_ch8.adb
@@ -8297,6 +8297,7 @@ package body Sem_Ch8 is
   ----------------------

   procedure Mark_Use_Clauses (Id : Node_Or_Entity_Id) is
+
      procedure Mark_Parameters (Call : Entity_Id);
      --  Perform use_type_clause marking for all parameters in a subprogram
      --  or operator call.
@@ -8528,7 +8529,8 @@ package body Sem_Ch8 is
     (Clause1 : Entity_Id;
      Clause2 : Entity_Id) return Entity_Id
   is
-      Scope1, Scope2 : Entity_Id;
+      Scope1 : Entity_Id;
+      Scope2 : Entity_Id;

   begin
      if Clause1 = Clause2 then