From fda528a811058f19b16a525940b3ca1b0716e129 Mon Sep 17 00:00:00 2001
From: Arnaud Charlet <charlet@gcc.gnu.org>
Date: Mon, 26 May 2008 17:51:38 +0200
Subject: [PATCH] * exp_vfpt.adb: Minor reformatting

From-SVN: r135945
---
 gcc/ada/exp_vfpt.adb | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/gcc/ada/exp_vfpt.adb b/gcc/ada/exp_vfpt.adb
index 612842952f5..9f172566cf5 100644
--- a/gcc/ada/exp_vfpt.adb
+++ b/gcc/ada/exp_vfpt.adb
@@ -454,6 +454,7 @@ package body Exp_VFpt is
       Args : List_Id;
       Atyp : Entity_Id;
       Rtyp : constant Entity_Id  := Etype (N);
+
    begin
       if Digits_Value (Typ) = VAXFF_Digits then
          Func := RE_Return_F;
@@ -471,11 +472,10 @@ package body Exp_VFpt is
       Rewrite (N,
         Convert_To (Rtyp,
           Make_Function_Call (Loc,
-            Name => New_Occurrence_Of (RTE (Func), Loc),
+            Name                   => New_Occurrence_Of (RTE (Func), Loc),
             Parameter_Associations => Args)));
 
       Analyze_And_Resolve (N, Typ, Suppress => All_Checks);
-
    end Expand_Vax_Foreign_Return;
 
    -----------------------------
-- 
2.30.2