From: Arnaud Charlet Date: Mon, 3 Jan 2005 15:39:36 +0000 (+0100) Subject: make.adb (Collect_Arguments_And_Compile): Do not attempt to build libraries when... X-Git-Tag: releases/gcc-4.0.0~1812 X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=fa0d36062d9931c9fc76073b402b60a650f9c1a2;p=thirdparty%2Fgcc.git make.adb (Collect_Arguments_And_Compile): Do not attempt to build libraries when Unique_Compile is True (-u switch). * make.adb (Collect_Arguments_And_Compile): Do not attempt to build libraries when Unique_Compile is True (-u switch). (Gnatmake): ditto. From-SVN: r92843 --- diff --git a/gcc/ada/make.adb b/gcc/ada/make.adb index 7d9be713f8cd..eb57773fe895 100644 --- a/gcc/ada/make.adb +++ b/gcc/ada/make.adb @@ -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 :=