diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2010-06-18 16:11:51 +0200 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2010-06-18 16:11:51 +0200 |
| commit | afb2d209040ffd4e61996f4e080cc5a5146ba437 (patch) | |
| tree | e61b7d10d28ce9e0ee770c8768dacf396bd09b2b /gcc | |
| parent | e7e4d2302eb07595a1dfa10c74299ced88f47f3e (diff) | |
| download | gcc-afb2d209040ffd4e61996f4e080cc5a5146ba437.zip gcc-afb2d209040ffd4e61996f4e080cc5a5146ba437.tar.gz gcc-afb2d209040ffd4e61996f4e080cc5a5146ba437.tar.bz2 | |
[multiple changes]
2010-06-18 Gary Dismukes <dismukes@adacore.com>
* gnat1drv.adb (Adjust_Global_Switches): Enable
Use_Expression_With_Actions for AAMP and VM targets.
2010-06-18 Vincent Celier <celier@adacore.com>
* prj-nmsc.adb (Process_Linker): Recognize response file format GCC.
From-SVN: r160994
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/ada/ChangeLog | 9 | ||||
| -rw-r--r-- | gcc/ada/gnat1drv.adb | 14 | ||||
| -rw-r--r-- | gcc/ada/prj-nmsc.adb | 3 |
3 files changed, 17 insertions, 9 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 151c841..9c67c1f 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,12 @@ +2010-06-18 Gary Dismukes <dismukes@adacore.com> + + * gnat1drv.adb (Adjust_Global_Switches): Enable + Use_Expression_With_Actions for AAMP and VM targets. + +2010-06-18 Vincent Celier <celier@adacore.com> + + * prj-nmsc.adb (Process_Linker): Recognize response file format GCC. + 2010-06-18 Thomas Quinot <quinot@adacore.com> * exp_ch4.adb: Minor reformatting. diff --git a/gcc/ada/gnat1drv.adb b/gcc/ada/gnat1drv.adb index 85d9dcc..33dcfb8 100644 --- a/gcc/ada/gnat1drv.adb +++ b/gcc/ada/gnat1drv.adb @@ -345,16 +345,12 @@ procedure Gnat1drv is elsif Debug_Flag_Dot_YY then Use_Expression_With_Actions := False; - -- If no debug flags, usage off for AAMP, VM, SCIL cases + -- If no debug flags, usage off for SCIL - elsif AAMP_On_Target - or else VM_Target /= No_VM - or else Generate_SCIL - then + elsif Generate_SCIL then Use_Expression_With_Actions := False; - -- Otherwise normal gcc back end, which does implement this feature so - -- by default we allow its use. + -- Otherwise this feature is implemented, so we allow its use else Use_Expression_With_Actions := True; @@ -377,8 +373,8 @@ procedure Gnat1drv is then Back_End_Handles_Limited_Types := False; - -- Otherwise normal gcc back end, for now still turn flag off by - -- default, since we have not verified proper back end handling. + -- Otherwise normal gcc back end, for now still turn flag off by + -- default, since we have not verified proper back end handling. else Back_End_Handles_Limited_Types := False; diff --git a/gcc/ada/prj-nmsc.adb b/gcc/ada/prj-nmsc.adb index a3d6563..74a256d 100644 --- a/gcc/ada/prj-nmsc.adb +++ b/gcc/ada/prj-nmsc.adb @@ -1838,6 +1838,9 @@ package body Prj.Nmsc is elsif Name = Name_Gnu then Project.Config.Resp_File_Format := GNU; + elsif Name_Buffer (1 .. Name_Len) = "gcc" then + Project.Config.Resp_File_Format := GCC; + elsif Name = Name_Object_List then Project.Config.Resp_File_Format := Object_List; |