diff options
author | Eric Botcazou <ebotcazou@adacore.com> | 2011-06-06 10:32:11 +0000 |
---|---|---|
committer | Eric Botcazou <ebotcazou@gcc.gnu.org> | 2011-06-06 10:32:11 +0000 |
commit | 5c4a1c7b20dfd908f43951e16ff2679a4b184d1a (patch) | |
tree | 29d531f11d570bb390201a3233ee61d76d77c27e /gcc/ada/gcc-interface/utils2.c | |
parent | e9f57686fcfaf04788a27d6433e7bf727d08001c (diff) | |
download | gcc-5c4a1c7b20dfd908f43951e16ff2679a4b184d1a.zip gcc-5c4a1c7b20dfd908f43951e16ff2679a4b184d1a.tar.gz gcc-5c4a1c7b20dfd908f43951e16ff2679a4b184d1a.tar.bz2 |
utils2.c (gnat_stabilize_reference): Fix thinko.
* gcc-interface/utils2.c (gnat_stabilize_reference) <COMPOUND_EXPR>:
Fix thinko.
From-SVN: r174690
Diffstat (limited to 'gcc/ada/gcc-interface/utils2.c')
-rw-r--r-- | gcc/ada/gcc-interface/utils2.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/gcc-interface/utils2.c b/gcc/ada/gcc-interface/utils2.c index db19032..2a455d1 100644 --- a/gcc/ada/gcc-interface/utils2.c +++ b/gcc/ada/gcc-interface/utils2.c @@ -2518,8 +2518,8 @@ gnat_stabilize_reference (tree ref, bool force, bool *success) result = build2 (COMPOUND_EXPR, type, gnat_stabilize_reference (TREE_OPERAND (ref, 0), force, success), - gnat_stabilize_reference_1 (TREE_OPERAND (ref, 1), - force)); + gnat_stabilize_reference (TREE_OPERAND (ref, 1), force, + success)); break; case CONSTRUCTOR: |