[Ada] Set missing Parent field of block entity
authorEric Botcazou <ebotcazou@adacore.com>
Thu, 11 Jun 2020 13:25:44 +0000 (15:25 +0200)
committerPierre-Marie de Rodat <derodat@adacore.com>
Thu, 16 Jul 2020 09:18:13 +0000 (05:18 -0400)
commit340375cae9e62db137a1d8231324097e8b6de856
tree14f6c1621dac02a683061bb73a246f93c47f43fe
parent8e640a5f32160fd786cc4722c8b46bbca7ba500a
[Ada] Set missing Parent field of block entity

gcc/ada/

* exp_ch9.adb (Expand_N_Accept_Statement): Set Parent of the
created block entity to the created block statement.
gcc/ada/exp_ch9.adb