diff options
author | Eric Botcazou <ebotcazou@adacore.com> | 2018-09-26 09:16:49 +0000 |
---|---|---|
committer | Pierre-Marie de Rodat <pmderodat@gcc.gnu.org> | 2018-09-26 09:16:49 +0000 |
commit | 3b9d159401751981118415b472dd0bdb68e862f6 (patch) | |
tree | 784b824f3eb73fef6ee98fbc3e7a2dfbfbd4f130 /gcc/ada/gcc-interface/misc.c | |
parent | 1ac984f5952c52f0f70e64f5ab7a99fa62877df7 (diff) | |
download | gcc-3b9d159401751981118415b472dd0bdb68e862f6.zip gcc-3b9d159401751981118415b472dd0bdb68e862f6.tar.gz gcc-3b9d159401751981118415b472dd0bdb68e862f6.tar.bz2 |
[Ada] Wrong handling of address clause for limited record type
2018-09-26 Eric Botcazou <ebotcazou@adacore.com>
gcc/ada/
* gcc-interface/decl.c (gnat_to_gnu_entity) <E_Variable>: Adjust
code retrieving the address when a clause has already been
processed.
* gcc-interface/trans.c (gnat_to_gnu)
<N_Attribute_Definition_Clause>: For an object with a Freeze
node, build a meaningful expression.
gcc/testsuite/
* gnat.dg/addr12.adb, gnat.dg/addr12_a.adb,
gnat.dg/addr12_a.ads, gnat.dg/addr12_b.adb,
gnat.dg/addr12_b.ads, gnat.dg/addr12_c.ads: New testcase.
From-SVN: r264606
Diffstat (limited to 'gcc/ada/gcc-interface/misc.c')
0 files changed, 0 insertions, 0 deletions