From: Robert Dewar <dewar@adacore.com>
Date: Wed, 20 Aug 2008 15:50:52 +0000 (+0200)
Subject: g-comlin.adb: Minor reformatting
X-Git-Tag: releases/gcc-4.4.0~3014
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=d9f3a59383b9c1ab119c45bc8beef138adaf0922;p=thirdparty%2Fgcc.git

g-comlin.adb: Minor reformatting

2008-08-20  Robert Dewar  <dewar@adacore.com>

	* g-comlin.adb: Minor reformatting

From-SVN: r139320
---

diff --git a/gcc/ada/make.adb b/gcc/ada/make.adb
index 9da7537249f3..89bb4f49655a 100644
--- a/gcc/ada/make.adb
+++ b/gcc/ada/make.adb
@@ -1271,16 +1271,14 @@ package body Make is
               Source_File_Name => File_Name,
               Source_Index     => Index,
               Naming           => Project_Tree.Projects.Table
-                (Main_Project).Naming,
+                                   (Main_Project).Naming,
               In_Package       => The_Package,
-              Allow_ALI        =>
-                Program = Binder or else Program = Linker);
+              Allow_ALI        => Program = Binder or else Program = Linker);
 
          if Switches.Kind = List then
             Program_Args := Program;
 
             Switch_List := Switches.Values;
-
             while Switch_List /= Nil_String loop
                Element := Project_Tree.String_Elements.Table (Switch_List);
                Get_Name_String (Element.Value);