diff options
| author | Robert Dewar <dewar@adacore.com> | 2008-08-20 17:50:52 +0200 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2008-08-20 17:50:52 +0200 |
| commit | d9f3a59383b9c1ab119c45bc8beef138adaf0922 (patch) | |
| tree | 79000caf69b984980706485d1f75639dc0a61888 /gcc | |
| parent | 76871f97ebf5db1fdd0c85f88323547bce808c0d (diff) | |
| download | gcc-d9f3a59383b9c1ab119c45bc8beef138adaf0922.zip gcc-d9f3a59383b9c1ab119c45bc8beef138adaf0922.tar.gz gcc-d9f3a59383b9c1ab119c45bc8beef138adaf0922.tar.bz2 | |
g-comlin.adb: Minor reformatting
2008-08-20 Robert Dewar <dewar@adacore.com>
* g-comlin.adb: Minor reformatting
From-SVN: r139320
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/ada/make.adb | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/gcc/ada/make.adb b/gcc/ada/make.adb index 9da7537..89bb4f4 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); |