2010-06-17 Vincent Celier <celier@adacore.com>

	* back_end.adb (Scan_Compiler_Arguments): Put all arguments in new
	local Argument_List variable Args.
	* switch-c.adb (Scan_Front_End_Switches): New Argument_List argument
	Args.
	(Switch_Subsequently_Cancelled): New Argument_List argument Args. Look
	for subsequent switches in Args.
	* switch-c.ads (Scan_Front_End_Switches): New Argument_List argument
	Args.
	* gcc-interface/Make-lang.in: Update dependencies.



git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@160890 138bc75d-0d04-0410-961f-82ee72b054a4

1 files changed, 6 insertions, 3 deletions

diff --git a/gcc/ada/switch-c.ads b/gcc/ada/switch-c.ads
index db7ffc3ddf4..1595858a28d 100644
--- a/gcc/ada/switch-c.ads
+++ b/gcc/ada/switch-c.ads
@@ -29,10 +29,13 @@
 --  switches that are recognized. In addition, package Debug documents
 --  the otherwise undocumented debug switches that are also recognized.
 
+with System.OS_Lib; use System.OS_Lib;
+
 package Switch.C is
 
    procedure Scan_Front_End_Switches
      (Switch_Chars : String;
+      Args         : Argument_List;
       Arg_Rank     : Positive);
    --  Procedures to scan out front end switches stored in the given string.
    --  The first character is known to be a valid switch character, and there
@@ -42,8 +45,8 @@ package Switch.C is
    --  a fatal error exit and control does not return. The call also sets
    --  Usage_Requested to True if a switch -gnath is encountered.
    --
-   --  Arg_Rank is the position of the switch in the command line arguments.
-   --  It is used for certain switches -gnatx to check if a subsequent switch
-   --  -gnat-x cancels the switch -gnatx.
+   --  Args is the full list of command line arguments. Arg_Rank is the
+   --  position of the switch in Args. It is used for certain switches -gnatx
+   --  to check if a subsequent switch -gnat-x cancels the switch -gnatx.
 
 end Switch.C;