make.adb (Collect_Arguments_And_Compile): Do not attempt to build libraries when...
authorArnaud Charlet <charlet@gcc.gnu.org>
Mon, 3 Jan 2005 15:39:36 +0000 (16:39 +0100)
committerArnaud Charlet <charlet@gcc.gnu.org>
Mon, 3 Jan 2005 15:39:36 +0000 (16:39 +0100)
* make.adb (Collect_Arguments_And_Compile): Do not attempt to build
libraries when Unique_Compile is True (-u switch).
(Gnatmake): ditto.

From-SVN: r92843

gcc/ada/make.adb

index 7d9be713f8cdb89a175b5f84872d155eb11a3d06..eb57773fe895002ae83fb91c311660af45b7093f 100644 (file)
@@ -2224,7 +2224,9 @@ package body Make is
             if not Projects.Table (Arguments_Project).Externally_Built then
                Prj.Env.Set_Ada_Paths (Arguments_Project, True);
 
-               if MLib.Tgt.Support_For_Libraries /= MLib.Tgt.None then
+               if not Unique_Compile
+                 and then MLib.Tgt.Support_For_Libraries /= MLib.Tgt.None
+               then
                   declare
                      The_Data : Project_Data :=
                                   Projects.Table (Arguments_Project);
@@ -4352,7 +4354,9 @@ package body Make is
          --  put all the project sources in the queue, and flag the project
          --  so that the library is generated.
 
-         if MLib.Tgt.Support_For_Libraries /= MLib.Tgt.None then
+         if not Unique_Compile
+           and then MLib.Tgt.Support_For_Libraries /= MLib.Tgt.None
+         then
             for Proj in Projects.First .. Projects.Last loop
                if Projects.Table (Proj).Library then
                   Projects.Table (Proj).Need_To_Build_Lib :=