diff options
author | Eric Botcazou <ebotcazou@adacore.com> | 2016-06-13 08:00:17 +0000 |
---|---|---|
committer | Eric Botcazou <ebotcazou@gcc.gnu.org> | 2016-06-13 08:00:17 +0000 |
commit | 42e77cbc7d5c00e637bca5614a8d688ad08a39c7 (patch) | |
tree | a050bf546eea4542eff56409c4ae815fac2beffd /gcc/ada/gcc-interface/decl.c | |
parent | 7474dcc1fed2bbce551341798bd4d7e6e10a5aa5 (diff) | |
download | gcc-42e77cbc7d5c00e637bca5614a8d688ad08a39c7.zip gcc-42e77cbc7d5c00e637bca5614a8d688ad08a39c7.tar.gz gcc-42e77cbc7d5c00e637bca5614a8d688ad08a39c7.tar.bz2 |
decl.c (gnat_to_gnu_entity): Deal with PLUS_EXPR in the expression of a renaming.
* gcc-interface/decl.c (gnat_to_gnu_entity) <E_Variable>: Deal with
PLUS_EXPR in the expression of a renaming.
From-SVN: r237360
Diffstat (limited to 'gcc/ada/gcc-interface/decl.c')
-rw-r--r-- | gcc/ada/gcc-interface/decl.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/gcc/ada/gcc-interface/decl.c b/gcc/ada/gcc-interface/decl.c index 8d4ff3f..985527e 100644 --- a/gcc/ada/gcc-interface/decl.c +++ b/gcc/ada/gcc-interface/decl.c @@ -1003,6 +1003,7 @@ gnat_to_gnu_entity (Entity_Id gnat_entity, tree gnu_expr, bool definition) && !call_is_atomic_load (inner)) || TREE_CODE (inner) == ADDR_EXPR || TREE_CODE (inner) == NULL_EXPR + || TREE_CODE (inner) == PLUS_EXPR || TREE_CODE (inner) == CONSTRUCTOR || CONSTANT_CLASS_P (inner) /* We need to detect the case where a temporary is created to |