OpenE2K/gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

[Ada] PR ada/79724

Browse Source 
gcc/ada/

	PR ada/79724
	* osint.adb (Program_Name): Fix handling of suffixes.
This commit is contained in:
Arnaud Charlet 2022-01-03 10:51:07 +00:00 committed by Pierre-Marie de Rodat
parent 6e82658607
commit 7aa3800216
1 changed files with 1 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
gcc/ada/osint.adb
View File

@ -2279,8 +2279,6 @@ package body Osint is
Find_Program_Name;
Start_Of_Suffix := Name_Len + 1;
-- Find the target prefix if any, for the cross compilation case.
-- For instance in "powerpc-elf-gcc" the target prefix is
-- "powerpc-elf-"
@ -2304,9 +2302,7 @@ package body Osint is
end if;
end loop;
if End_Of_Prefix > 1 then
Start_Of_Suffix := End_Of_Prefix + Prog'Length + 1;
end if;
Start_Of_Suffix := End_Of_Prefix + Prog'Length + 1;
-- Create the new program name