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

[Ada] Do not instantiate generic bodies outside of main unit in GNATprove

Browse Source 
gcc/ada/

	* sem_ch12.adb (Needs_Body_Instantiated): In GNATprove mode, do
	not instantiate bodies outside of the main unit.
This commit is contained in:
Yannick Moy 2020-09-10 17:25:35 +02:00 committed by Pierre-Marie de Rodat
parent cfc3a1db82
commit aa32e8f466
1 changed files with 10 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
gcc/ada/sem_ch12.adb
View File

@ -4070,6 +4070,16 @@ package body Sem_Ch12 is
return True;
end if;
-- In GNATprove mode, never instantiate bodies outside of the main
-- unit, as it does not use frontend/backend inlining in the way that
-- GNAT does, so does not benefit from such instantiations. On the
-- contrary, such instantiations may bring artificial constraints,
-- as for example such bodies may require preprocessing.
if GNATprove_Mode then
return False;
end if;
-- If not, then again no need to instantiate bodies in generic units
if Is_Generic_Unit (Cunit_Entity (Get_Code_Unit (N))) then