diff options
author | Eric Botcazou <ebotcazou@adacore.com> | 2015-06-03 09:22:09 +0000 |
---|---|---|
committer | Eric Botcazou <ebotcazou@gcc.gnu.org> | 2015-06-03 09:22:09 +0000 |
commit | d020df06a7becb7e344e3ad39ca98338952c6f3d (patch) | |
tree | 948eed935bf9d1393355009e0acc1c8b8ef09a26 /gcc/ada/gcc-interface | |
parent | 2c19378bd99e09f4ee4876a090a884d25cd4e941 (diff) | |
download | gcc-d020df06a7becb7e344e3ad39ca98338952c6f3d.zip gcc-d020df06a7becb7e344e3ad39ca98338952c6f3d.tar.gz gcc-d020df06a7becb7e344e3ad39ca98338952c6f3d.tar.bz2 |
trans.c (gnat_to_gnu): Fix typo in latest change.
* gcc-interface/trans.c (gnat_to_gnu) <N_Simple_Return_Statement>: Fix
typo in latest change.
From-SVN: r224066
Diffstat (limited to 'gcc/ada/gcc-interface')
-rw-r--r-- | gcc/ada/gcc-interface/trans.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/gcc-interface/trans.c b/gcc/ada/gcc-interface/trans.c index b561bf0..eeb5b4e 100644 --- a/gcc/ada/gcc-interface/trans.c +++ b/gcc/ada/gcc-interface/trans.c @@ -6809,7 +6809,7 @@ gnat_to_gnu (Node_Id gnat_node) self-referential since we want to allocate the fixed size. */ if (TREE_CODE (gnu_ret_val) == COMPONENT_REF && type_is_padding_self_referential - (TREE_OPERAND (gnu_ret_val, 0))) + (TREE_TYPE (TREE_OPERAND (gnu_ret_val, 0)))) gnu_ret_val = TREE_OPERAND (gnu_ret_val, 0); /* If the function returns by direct reference, return a pointer |