[Ada] Don't constant-fold renamed qualified expressions
authorSteve Baird <baird@adacore.com>
Tue, 13 Oct 2020 19:23:11 +0000 (12:23 -0700)
committerPierre-Marie de Rodat <derodat@adacore.com>
Wed, 25 Nov 2020 13:22:34 +0000 (08:22 -0500)
commiteb0d08adb60fc39d59f8de378074b751a18cd184
treeece038e8dfcb3de588c1ddac3cd8dda49de2f7f6
parent2d80df423310f1c40a3a661d5587261ee9151288
[Ada] Don't constant-fold renamed qualified expressions

gcc/ada/

* exp_ch2.adb (Expand_Entity_Reference): A new local predicate
Is_Object_Renaming_Name indicates whether a given expression
occurs (after looking through qualified expressions and type
conversions) as the name of an object renaming declaration. If
Current_Value is available but this new predicate is True, then
ignore the availability of Current_Value.
gcc/ada/exp_ch2.adb