[Ada] Accept local objects in the prefix of attribute Loop_Entry
authorPiotr Trojanek <trojanek@adacore.com>
Wed, 7 Oct 2020 21:19:28 +0000 (23:19 +0200)
committerPierre-Marie de Rodat <derodat@adacore.com>
Tue, 24 Nov 2020 10:16:04 +0000 (05:16 -0500)
commit218079efc59095aa07da7f4f2a7a50b07f35f66e
treecd38c4fbff10cfb42e049695e018880c56aebba9
parent4f94320340e621e0b32e26f5e5b4d8883c7f8241
[Ada] Accept local objects in the prefix of attribute Loop_Entry

gcc/ada/

* sem_attr.adb (Declared_Within): Return True for objects
declared within the attribute Loop_Entry prefix itself.
gcc/ada/sem_attr.adb