From 658a41acf025369ccfad016080b615fe5091e63f Mon Sep 17 00:00:00 2001 From: Eric Botcazou Date: Sun, 10 Oct 2010 12:29:16 +0000 Subject: [PATCH] trans.c (gnat_to_gnu): Use invert_truthvalue_loc instead of invert_truthvalue. * gcc-interface/trans.c (gnat_to_gnu) : Use invert_truthvalue_loc instead of invert_truthvalue. * gcc-interface/utils2.c (build_binary_op) : Likewise. (build_unary_op) : Likewise. From-SVN: r165253 --- gcc/ada/ChangeLog | 7 +++++++ gcc/ada/gcc-interface/trans.c | 3 ++- gcc/ada/gcc-interface/utils2.c | 4 ++-- 3 files changed, 11 insertions(+), 3 deletions(-) diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 7f6d18e8efe..0b1f3587f57 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,10 @@ +2010-10-10 Eric Botcazou + + * gcc-interface/trans.c (gnat_to_gnu) : Use + invert_truthvalue_loc instead of invert_truthvalue. + * utils2.c (build_binary_op) : Likewise. + (build_unary_op) : Likewise. + 2010-10-10 Eric Botcazou * gcc-interface/decl.c (gnat_to_gnu_entity) : Add diff --git a/gcc/ada/gcc-interface/trans.c b/gcc/ada/gcc-interface/trans.c index 36a246297c0..b644688b1e5 100644 --- a/gcc/ada/gcc-interface/trans.c +++ b/gcc/ada/gcc-interface/trans.c @@ -4496,7 +4496,8 @@ gnat_to_gnu (Node_Id gnat_node) } if (kind == N_Not_In) - gnu_result = invert_truthvalue (gnu_result); + gnu_result + = invert_truthvalue_loc (EXPR_LOCATION (gnu_result), gnu_result); } break; diff --git a/gcc/ada/gcc-interface/utils2.c b/gcc/ada/gcc-interface/utils2.c index c40223f8e36..8419170cdbb 100644 --- a/gcc/ada/gcc-interface/utils2.c +++ b/gcc/ada/gcc-interface/utils2.c @@ -791,7 +791,7 @@ build_binary_op (enum tree_code op_code, tree result_type, result = compare_arrays (result_type, left_operand, right_operand); if (op_code == NE_EXPR) - result = invert_truthvalue (result); + result = invert_truthvalue_loc (EXPR_LOCATION (result), result); else gcc_assert (op_code == EQ_EXPR); @@ -1018,7 +1018,7 @@ build_unary_op (enum tree_code op_code, tree result_type, tree operand) #ifdef ENABLE_CHECKING gcc_assert (TREE_CODE (get_base_type (result_type)) == BOOLEAN_TYPE); #endif - result = invert_truthvalue (operand); + result = invert_truthvalue_loc (EXPR_LOCATION (operand), operand); break; case ATTR_ADDR_EXPR: -- 2.30.2