From d020df06a7becb7e344e3ad39ca98338952c6f3d Mon Sep 17 00:00:00 2001 From: Eric Botcazou Date: Wed, 3 Jun 2015 09:22:09 +0000 Subject: [PATCH] trans.c (gnat_to_gnu): Fix typo in latest change. * gcc-interface/trans.c (gnat_to_gnu) : Fix typo in latest change. From-SVN: r224066 --- gcc/ada/ChangeLog | 5 +++++ gcc/ada/gcc-interface/trans.c | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 079828ec3f9..dc85f3bb392 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,8 @@ +2015-06-03 Eric Botcazou + + * gcc-interface/trans.c (gnat_to_gnu) : Fix + typo in latest change. + 2015-06-01 Eric Botcazou * gcc-interface/Makefile.in: Fix ARM/Darwin configuration. diff --git a/gcc/ada/gcc-interface/trans.c b/gcc/ada/gcc-interface/trans.c index b561bf015a3..eeb5b4e707d 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 -- 2.30.2