diff options
Diffstat (limited to 'gcc/ada')
| -rw-r--r-- | gcc/ada/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/ada/gcc-interface/trans.c | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 0253a69..082756d 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,8 @@ +2009-07-07 Manuel López-Ibáñez <manu@gcc.gnu.org> + + * gcc-interface/trans.c (gnat_gimplify_expr): Replace EXPR_LOCUS by + EXPR_LOCATION. + 2009-07-07 Gary Dismukes <dismukes@adacore.com> * exp_ch6.adb (Expand_Actuals): Call Add_Call_By_Copy_Code for in out diff --git a/gcc/ada/gcc-interface/trans.c b/gcc/ada/gcc-interface/trans.c index 1008f1a..76200ab 100644 --- a/gcc/ada/gcc-interface/trans.c +++ b/gcc/ada/gcc-interface/trans.c @@ -5846,7 +5846,7 @@ gnat_gimplify_expr (tree *expr_p, gimple_seq *pre_p, stmt = gimplify_assign (new_var, op, pre_p); if (EXPR_HAS_LOCATION (op)) - gimple_set_location (stmt, *EXPR_LOCUS (op)); + gimple_set_location (stmt, EXPR_LOCATION (op)); TREE_OPERAND (expr, 0) = new_var; recompute_tree_invariant_for_addr_expr (expr); |