r262728 - in /trunk/gcc/ada: ChangeLog exp_ch7.adb

[pmderodat@gcc.gnu.org]

Author: pmderodat
Date: Mon Jul 16 14:12:18 2018
New Revision: 262728

URL: https://gcc.gnu.org/viewcvs?rev=262728&root=gcc&view=rev
Log:
[Ada] Fix expansion of blocks in loops inside elaboration code

2018-07-16  Ed Schonberg  <schonberg@adacore.com>

gcc/ada/

	* exp_ch7.adb (Check_Unnesting_Elaboration_Code): Handle loops that
	contain blocks in the elaboration code for a package body. Create the
	elaboration subprogram wrapper only if there is a subprogram
	declaration in a block or loop.

Modified:
    trunk/gcc/ada/ChangeLog
    trunk/gcc/ada/exp_ch7.adb