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

[Ada] Unnesting: fix handling of generic associations

Browse Source 
2018-06-11  Ed Schonberg  <schonberg@adacore.com>

gcc/ada/

	* exp_unst.adb (Visit_Node): Skip generic associations.

From-SVN: r261408
This commit is contained in:
Ed Schonberg 2018-06-11 09:17:40 +00:00 committed by Pierre-Marie de Rodat
parent a8c316b2a1
commit d6cb71164c
2 changed files with 11 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
gcc/ada/ChangeLog
View File

@ -1,3 +1,7 @@
2018-06-11 Ed Schonberg <schonberg@adacore.com>
* exp_unst.adb (Visit_Node): Skip generic associations.
2018-06-11 Arnaud Charlet <charlet@adacore.com>
* libgnat/memtrack.adb (fwrite): Remove second definition.

7
gcc/ada/exp_unst.adb
View File

@ -825,6 +825,13 @@ package body Exp_Unst is
return Skip;
end if;
-- Generic associations are not analyzed: the actuals are
-- transferred to renaming qnd subtype declarations that
-- are the ones that must be examined.
when N_Generic_Association =>
return Skip;
-- Indexed references can be uplevel if the type isn't static
-- and if the lower bound (or an inner bound for a multi-
-- dimensional array) is uplevel.