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-linux.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-linux.adb')
| -rw-r--r-- | gcc/ada/mlib-tgt-linux.adb | 10 |
1 files changed, 7 insertions, 3 deletions
diff --git a/gcc/ada/mlib-tgt-linux.adb b/gcc/ada/mlib-tgt-linux.adb index a4a0ce8..a3b82a4 100644 --- a/gcc/ada/mlib-tgt-linux.adb +++ b/gcc/ada/mlib-tgt-linux.adb @@ -103,6 +103,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; @@ -144,7 +145,8 @@ package body MLib.Tgt is (Output_File => Lib_File, Objects => Ofiles, Options => Options & Init_Fini.all, - Driver_Name => Driver_Name); + Driver_Name => Driver_Name, + Options_2 => Options_2); else Version_Arg := new String'("-Wl,-soname," & Lib_Version); @@ -154,7 +156,8 @@ package body MLib.Tgt is (Output_File => Lib_Version, Objects => Ofiles, Options => Options & Version_Arg & Init_Fini.all, - Driver_Name => Driver_Name); + Driver_Name => Driver_Name, + Options_2 => Options_2); Symbolic_Link_Needed := Lib_Version /= Lib_File; else @@ -162,7 +165,8 @@ package body MLib.Tgt is (Output_File => Lib_Dir & Directory_Separator & Lib_Version, Objects => Ofiles, Options => Options & Version_Arg & Init_Fini.all, - Driver_Name => Driver_Name); + Driver_Name => Driver_Name, + Options_2 => Options_2); Symbolic_Link_Needed := Lib_Dir & Directory_Separator & Lib_Version /= Lib_File; end if; |