[Ada] Crash on use of Loop_Entry, Result, and Old as actuals
authorJustin Squirek <squirek@adacore.com>
Thu, 12 Dec 2019 10:01:55 +0000 (10:01 +0000)
committerPierre-Marie de Rodat <pmderodat@gcc.gnu.org>
Thu, 12 Dec 2019 10:01:55 +0000 (10:01 +0000)
commit87b66149a315e0e0bc80a1075ce6da615fe55199
treec4904ecc4b4553aaf066da6ed785da41761a94d9
parentf48a35ca9cda25c6fe400fae6d5e4ad1c0d0804a
[Ada] Crash on use of Loop_Entry, Result, and Old as actuals

2019-12-12  Justin Squirek  <squirek@adacore.com>

gcc/ada/

* exp_ch6.adb (Expand_Call_Helper): Added null case for
'Loop_Entry, 'Old, and 'Result when calculating whether to
create extra accessibility parameters.
* sem_util.adb (Dynamic_Accessibility_Level): Added null case
for 'Loop_Entry, 'Old, and 'Result when  calculating
accessibility level based on access-valued attributes.  Also
added special handling for uses of 'Loop_Entry when used in its
indexed component form.

From-SVN: r279280
gcc/ada/ChangeLog
gcc/ada/exp_ch6.adb
gcc/ada/sem_util.adb