mirrors/gcc
0
0
Fork 0
mirror of https://gcc.gnu.org/git/gcc.git synced 2025-01-02 08:53:44 +08:00
Code Issues Actions Packages Projects Releases Wiki Activity

re PR target/47500 (-G0 option not recognized by gnat1)

Browse Source 
2014-11-20  Vincent Celier  <celier@adacore.com>

	PR ada/47500
	* back_end.adb (Scan_Back_End_Switches): Skip switch -G and
	its argument.

From-SVN: r217849
This commit is contained in:
Vincent Celier 2014-11-20 12:55:25 +01:00 committed by Arnaud Charlet
parent 5073ad7a64
commit bfe25016e3
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
gcc/ada/back_end.adb
View File

@ -232,9 +232,10 @@ package body Back_End is
Last : constant Natural := Switch_Last (Switch_Chars);
begin
-- Skip -o or internal GCC switches together with their argument
-- Skip -o, -G or internal GCC switches together with their argument.
if Switch_Chars (First .. Last) = "o"
or else Switch_Chars (First .. Last) = "G"
or else Is_Internal_GCC_Switch (Switch_Chars)
then
Next_Arg := Next_Arg + 1;