2008-05-26 Vincent Celier <celier@adacore.com>

	* prj-nmsc.adb:
	(Process_Project_Level_Simple_Attributes): process attribute Library_GCC

	* prj.ads:
	(Project_Configuration): New component Shared_Lib_Driver

From-SVN: r135897

diff --git a/gcc/ada/prj-nmsc.adb b/gcc/ada/prj-nmsc.adb
index a2fb600653dff4962d085906012708f125977a41..179609aaab9068b5174bb894cc257f0fc9e55752 100644 (file)
--- a/gcc/ada/prj-nmsc.adb
+++ b/gcc/ada/prj-nmsc.adb
@@ -1996,6 +1996,10 @@ package body Prj.Nmsc is
                        From_List => List,
                        In_Tree   => In_Tree);
 
+               elsif Attribute.Name = Name_Library_GCC then
+                  Data.Config.Shared_Lib_Driver :=
+                    File_Name_Type (Attribute.Value.Value);
+
                elsif Attribute.Name = Name_Archive_Suffix then
                   Data.Config.Archive_Suffix :=
                     File_Name_Type (Attribute.Value.Value);

diff --git a/gcc/ada/prj.ads b/gcc/ada/prj.ads
index c547eb66397037be5c6d22f0ce5ac2713e13b295..4c2af09c85c877969bbafa048d6b117d4a38b980 100644 (file)
--- a/gcc/ada/prj.ads
+++ b/gcc/ada/prj.ads
@@ -1189,6 +1189,10 @@ package Prj is
 
          --  Shared libraries
 
+         Shared_Lib_Driver             : File_Name_Type  := No_File;
+         --  The driver to link shared libraries. Set with attribute
+         --  Library_GCC. Default to gcc.
+
          Shared_Lib_Prefix        : File_Name_Type  := No_File;
          --  Part of a shared library file name that precedes the name of the
          --  library. Specified in the configuration. When not specified,
@@ -1230,6 +1234,7 @@ package Prj is
                                Archive_Indexer               => No_Name_List,
                                Archive_Suffix                => No_File,
                                Lib_Partial_Linker            => No_Name_List,
+                               Shared_Lib_Driver             => No_File,
                                Shared_Lib_Prefix             => No_File,
                                Shared_Lib_Suffix             => No_File,
                                Shared_Lib_Min_Options        => No_Name_List,