diff options
| author | Vincent Celier <celier@gnat.com> | 2004-10-04 14:53:52 +0000 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2004-10-04 16:53:52 +0200 |
| commit | 51004cb5839a2825ae15b563e7054ac66deda24a (patch) | |
| tree | 82ff6cb4ad487fb3197b3201c544213d8c85879f /gcc/ada/mlib-tgt-tru64.adb | |
| parent | 3b37ffbf15e7cc9e47a772f54de00bcec7737e74 (diff) | |
| download | gcc-51004cb5839a2825ae15b563e7054ac66deda24a.zip gcc-51004cb5839a2825ae15b563e7054ac66deda24a.tar.gz gcc-51004cb5839a2825ae15b563e7054ac66deda24a.tar.bz2 | |
mlib-tgt-tru64.adb, [...] (Build_Dynamic_Library): New parameter Options_2.
2004-10-04 Vincent Celier <celier@gnat.com>
* mlib-tgt-tru64.adb, mlib-tgt-aix.adb, mlib-tgt-irix.adb,
mlib-tgt-hpux.adb, mlib-tgt-linux.adb, mlib-tgt-solaris.adb,
mlib-tgt-vms-alpha.adb, mlib-tgt-vms-ia64.adb, mlib-tgt-mingw.adb,
mlib-tgt-vxworks.adb, mlib-tgt.adb (Build_Dynamic_Library): New
parameter Options_2.
* mlib-prj.ads, mlib-prj.adb (Build_Library): Call
Build_Dynamic_Library with an empty Options_2.
* mlib-utl.ads, mlib-utl.adb (Gcc): Parameter Options_2 has no
default anymore.
* makegpr.adb (Get_Imported_Directories.add): Remove trailing
directory separator, if any.
(Gprmake): Do not allow mains on the command line for library projects.
Do not attempt to link when the project is a library project.
(Library_Opts): New table to store Library_Options.
(Build_Library): If Library_Options is specified, pass these options
when building a shared library.
From-SVN: r88490
Diffstat (limited to 'gcc/ada/mlib-tgt-tru64.adb')
| -rw-r--r-- | gcc/ada/mlib-tgt-tru64.adb | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/gcc/ada/mlib-tgt-tru64.adb b/gcc/ada/mlib-tgt-tru64.adb index e40fe50..89be1ed 100644 --- a/gcc/ada/mlib-tgt-tru64.adb +++ b/gcc/ada/mlib-tgt-tru64.adb @@ -105,6 +105,7 @@ package body MLib.Tgt is Foreign : Argument_List; Afiles : Argument_List; Options : Argument_List; + Options_2 : Argument_List; Interfaces : Argument_List; Lib_Filename : String; Lib_Dir : String; @@ -149,6 +150,7 @@ package body MLib.Tgt is Options & Expect_Unresolved'Access & Init_Fini.all, + Options_2 => Options_2, Driver_Name => Driver_Name); else @@ -163,6 +165,7 @@ package body MLib.Tgt is Version_Arg & Expect_Unresolved'Access & Init_Fini.all, + Options_2 => Options_2, Driver_Name => Driver_Name); Symbolic_Link_Needed := Lib_Version /= Lib_File; @@ -175,6 +178,7 @@ package body MLib.Tgt is Version_Arg & Expect_Unresolved'Access & Init_Fini.all, + Options_2 => Options_2, Driver_Name => Driver_Name); Symbolic_Link_Needed := Lib_Dir & Directory_Separator & Lib_Version /= Lib_File; |