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

[Ada] No Default_Initial_Condition check when declaring an imported object

Browse Source 
2020-06-18  Steve Baird  <baird@adacore.com>

gcc/ada/

	* exp_ch3.adb (Expand_N_Object_Declaration): Do not generate a
	default initial condition check for the declaration of an
	imported object.
This commit is contained in:
Steve Baird 2020-04-23 11:37:10 -07:00 committed by Pierre-Marie de Rodat
parent 8cd7aec26f
commit a6c467131b
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
gcc/ada/exp_ch3.adb
View File

@ -7516,6 +7516,7 @@ package body Exp_Ch3 is
and then Has_DIC (Typ)
and then Present (DIC_Procedure (Typ))
and then not Has_Init_Expression (N)
and then not Is_Imported (Def_Id)
then
declare
DIC_Call : constant Node_Id := Build_DIC_Call (Loc, Def_Id, Typ);