[Ada] Unnesting issues with entry families and accept statements
authorGary Dismukes <dismukes@adacore.com>
Thu, 10 Oct 2019 15:25:08 +0000 (15:25 +0000)
committerPierre-Marie de Rodat <pmderodat@gcc.gnu.org>
Thu, 10 Oct 2019 15:25:08 +0000 (15:25 +0000)
commit6c142b14a07b166fcb2809cd3c3fcd59a748ce7e
treeedf436e3c3c8c5b5d838648d74a63ec55bcef53d
parent55160f6c7c838a2e35895cb741fff5ea237b1260
[Ada] Unnesting issues with entry families and accept statements

2019-10-10  Gary Dismukes  <dismukes@adacore.com>

gcc/ada/

* sem_util.adb (Enclosing_Subprogram): Handle the case of
E_Entry_Family, returning the entry family's associated
Protected_Body_Subprogram (as was already done for E_Entry).
* exp_ch9.adb (Expand_N_Accept_Statement): Call Reset_Scopes_To
on the block created for an accept statement to reset the scopes
of any local entities to the block scope.

From-SVN: r276830
gcc/ada/ChangeLog
gcc/ada/exp_ch9.adb
gcc/ada/sem_util.adb