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

[Ada] Further cleanup in inlining machinery 

This adds missing boilerplate stuff.  No functional changes.

2019-08-19  Eric Botcazou  <ebotcazou@adacore.com>

gcc/ada/

	* inline.adb (Initialize, Lock): Deal with
	Called_Pending_Instantiations.

From-SVN: r274656
This commit is contained in:
Eric Botcazou 2019-08-19 08:36:48 +00:00 committed by Pierre-Marie de Rodat
parent 432c8cddda
commit 92b635e518
2 changed files with 8 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
gcc/ada/ChangeLog
View File

@ -1,3 +1,8 @@
2019-08-19 Eric Botcazou <ebotcazou@adacore.com>
* inline.adb (Initialize, Lock): Deal with
Called_Pending_Instantiations.
2019-08-19 Ed Schonberg <schonberg@adacore.com>
* sem_ch6.adb (Check_Synchronized_Overriding): Complete

3
gcc/ada/inline.adb
View File

@ -4416,6 +4416,7 @@ package body Inline is
procedure Initialize is
begin
Pending_Instantiations.Init;
Called_Pending_Instantiations.Init;
Inlined_Bodies.Init;
Successors.Init;
Inlined.Init;
@ -4734,6 +4735,8 @@ package body Inline is
begin
Pending_Instantiations.Release;
Pending_Instantiations.Locked := True;
Called_Pending_Instantiations.Release;
Called_Pending_Instantiations.Locked := True;
Inlined_Bodies.Release;
Inlined_Bodies.Locked := True;
Successors.Release;