MatCat.OpenSource/8sa1-gcc
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

[Ada] Do not compile predefined units with -gnatp in gnatmake

Browse Source 
gcc/ada/

	* make.adb (GNAT_Flag): Change to "-gnatg".
	(Compile): Adjust comments accordingly.
This commit is contained in:
Eric Botcazou 2020-11-04 14:11:41 +01:00 committed by Pierre-Marie de Rodat
parent cc7c52c1d9
commit e2df202345
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
gcc/ada/make.adb
View File

@ -464,7 +464,7 @@ package body Make is
Ada_Flag_1 : constant String_Access := new String'("-x");
Ada_Flag_2 : constant String_Access := new String'("ada");
AdaSCIL_Flag : constant String_Access := new String'("adascil");
GNAT_Flag : constant String_Access := new String'("-gnatpg");
GNAT_Flag : constant String_Access := new String'("-gnatg");
Do_Not_Check_Flag : constant String_Access := new String'("-x");
Object_Suffix : constant String := Get_Target_Object_Suffix.all;
@ -1677,7 +1677,7 @@ package body Make is
L : File_Name_Type;
Source_Index : Int;
Args : Argument_List) return Process_Id;
-- Compiles S using Args. If S is a GNAT predefined source "-gnatpg" is
-- Compiles S using Args. If S is a GNAT predefined source "-gnatg" is
-- added to Args. Non blocking call. L corresponds to the expected
-- library file name. Process_Id of the process spawned to execute the
-- compilation.
@ -2027,7 +2027,7 @@ package body Make is
end loop;
end;
-- Set -gnatpg for predefined files (for this purpose the renamings
-- Set -gnatg for predefined files (for this purpose the renamings
-- such as Text_IO do not count as predefined). Note that we strip
-- the directory name from the source file name because the call to
-- Fname.Is_Predefined_File_Name cannot deal with directory prefixes.