diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2012-01-30 11:32:44 +0100 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2012-01-30 11:32:44 +0100 |
| commit | 457c5df44bb8524134ce27184f206368aa5c8e21 (patch) | |
| tree | 4aab5110df376caf9a50bb92412077d06203f096 /gcc/ada/gnatcmd.adb | |
| parent | 1b6897ce5df7413135001c2a1383238394411e67 (diff) | |
| download | gcc-457c5df44bb8524134ce27184f206368aa5c8e21.zip gcc-457c5df44bb8524134ce27184f206368aa5c8e21.tar.gz gcc-457c5df44bb8524134ce27184f206368aa5c8e21.tar.bz2 | |
[multiple changes]
2012-01-30 Vincent Pucci <pucci@adacore.com>
* sem_dim.adb (Expand_Put_Call_With_Dimension_Symbol): Minor
code clean up.
* s-diflio.ads: Minor change.
2012-01-30 Javier Miranda <miranda@adacore.com>
* exp_ch9.adb (Build_Dispatching_Requeue): Add missing call
to Get_Entry_Index. Required to generate code which provides
the correct value of Entry_Index in the target entry.
2012-01-30 Nicolas Roche <roche@adacore.com>
* system-vxworks-ppc.ads: Add pragma Linker_Options -crtbe to
fix issue with zcx on VxWorks5.
2012-01-30 Pascal Obry <obry@adacore.com>
* prj.ads, prj.adb (For_Every_Project_Imported): Remove
In_Aggregate_Lib.
(For_Every_Project_Imported_Context): New generic routine with
a context parameter.
* prj-nmsc.adb: Revert to use For_Every_Project_Imported Avoid
distributed complexity.
* prj-env.adb, prj-conf.adb, makeutl.adb, gnatcmd.adb: Ditto.
From-SVN: r183702
Diffstat (limited to 'gcc/ada/gnatcmd.adb')
| -rw-r--r-- | gcc/ada/gnatcmd.adb | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/gcc/ada/gnatcmd.adb b/gcc/ada/gnatcmd.adb index 361840c..8798399 100644 --- a/gcc/ada/gnatcmd.adb +++ b/gcc/ada/gnatcmd.adb @@ -6,7 +6,7 @@ -- -- -- B o d y -- -- -- --- Copyright (C) 1996-2011, Free Software Foundation, Inc. -- +-- Copyright (C) 1996-2012, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- -- terms of the GNU General Public License as published by the Free Soft- -- @@ -264,7 +264,6 @@ procedure GNATCmd is procedure Set_Library_For (Project : Project_Id; Tree : Project_Tree_Ref; - In_Aggregate_Lib : Boolean; Libraries_Present : in out Boolean); -- If Project is a library project, add the correct -L and -l switches to -- the linker invocation. @@ -1265,10 +1264,9 @@ procedure GNATCmd is procedure Set_Library_For (Project : Project_Id; Tree : Project_Tree_Ref; - In_Aggregate_Lib : Boolean; Libraries_Present : in out Boolean) is - pragma Unreferenced (Tree, In_Aggregate_Lib); + pragma Unreferenced (Tree); Path_Option : constant String_Access := MLib.Linker_Library_Path_Option; |