diff options
| author | Eric Botcazou <ebotcazou@adacore.com> | 2012-03-07 18:55:59 +0000 |
|---|---|---|
| committer | Eric Botcazou <ebotcazou@gcc.gnu.org> | 2012-03-07 18:55:59 +0000 |
| commit | 6ba4f08f3414d327506927c68845cb77864826fe (patch) | |
| tree | 70d0181abda949ab167190b0c16c3b5c6d0b427a /gcc/ada/gcc-interface/utils.c | |
| parent | 95f2389a7d909045ccbe7475945f823eabf91a03 (diff) | |
| download | gcc-6ba4f08f3414d327506927c68845cb77864826fe.zip gcc-6ba4f08f3414d327506927c68845cb77864826fe.tar.gz gcc-6ba4f08f3414d327506927c68845cb77864826fe.tar.bz2 | |
trans.c (Identifier_to_gnu): Don't unshare initializer.
* gcc-interface/trans.c (Identifier_to_gnu): Don't unshare initializer.
(add_decl_expr): Mark external DECLs as used.
* gcc-interface/utils.c (convert) <CONSTRUCTOR>: Copy the vector.
From-SVN: r185072
Diffstat (limited to 'gcc/ada/gcc-interface/utils.c')
| -rw-r--r-- | gcc/ada/gcc-interface/utils.c | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/gcc/ada/gcc-interface/utils.c b/gcc/ada/gcc-interface/utils.c index 062df3a..f9214fb 100644 --- a/gcc/ada/gcc-interface/utils.c +++ b/gcc/ada/gcc-interface/utils.c @@ -3894,6 +3894,8 @@ convert (tree type, tree expr) { expr = copy_node (expr); TREE_TYPE (expr) = type; + CONSTRUCTOR_ELTS (expr) + = VEC_copy (constructor_elt, gc, CONSTRUCTOR_ELTS (expr)); return expr; } |