aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/gcc-interface/decl.c
diff options
context:
space:
mode:
authorEric Botcazou <ebotcazou@adacore.com>2016-06-13 08:00:17 +0000
committerEric Botcazou <ebotcazou@gcc.gnu.org>2016-06-13 08:00:17 +0000
commit42e77cbc7d5c00e637bca5614a8d688ad08a39c7 (patch)
treea050bf546eea4542eff56409c4ae815fac2beffd /gcc/ada/gcc-interface/decl.c
parent7474dcc1fed2bbce551341798bd4d7e6e10a5aa5 (diff)
downloadgcc-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.c1
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