[Ada] Spurious error on Type'Access and <>
authorArnaud Charlet <charlet@adacore.com>
Mon, 30 Nov 2020 08:11:40 +0000 (03:11 -0500)
committerPierre-Marie de Rodat <derodat@adacore.com>
Thu, 17 Dec 2020 10:49:19 +0000 (05:49 -0500)
commit043d13792116b459cc3c3b1ba5cc7c40aec36719
treeabffb9a93a3d1310e89197da3b02be5b444871b1
parent337cbb9f9edaebb6cd6dba2f22c9d0437e1f81a0
[Ada] Spurious error on Type'Access and <>

gcc/ada/

* sem_attr.adb (OK_Self_Reference): Return True if node does not
come from source (e.g. a rewritten aggregate).
gcc/ada/sem_attr.adb