Minor reformatting.

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

diff --git a/gcc/ada/sem_ch3.adb b/gcc/ada/sem_ch3.adb
index 443c2d1..3e10ac3 100644 (file)
--- a/gcc/ada/sem_ch3.adb
+++ b/gcc/ada/sem_ch3.adb
@@ -15620,9 +15620,10 @@ package body Sem_Ch3 is
       function Root_Corresponding_Discriminant
         (Discr : Entity_Id) return Entity_Id
       is
-         D : Entity_Id := Discr;
+         D : Entity_Id;
 
       begin
+         D := Discr;
          while Present (Corresponding_Discriminant (D)) loop
             D := Corresponding_Discriminant (D);
          end loop;