mirror/gcc
2
0
Fork 0
mirror of git://gcc.gnu.org/git/gcc.git synced 2025-04-21 15:50:50 +08:00
Code Issues Packages Projects Releases Wiki Activity

[multiple changes]

Browse Source 
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
This commit is contained in:
Arnaud Charlet 2010-06-18 16:11:51 +02:00
parent e7e4d2302e
commit afb2d20904
3 changed files with 17 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
gcc/ada/ChangeLog
View File

@ -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.

14
gcc/ada/gnat1drv.adb
View File

@ -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;

3
gcc/ada/prj-nmsc.adb
View File

@ -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;