trans.c (gnat_to_gnu): Use invert_truthvalue_loc instead of invert_truthvalue.

	* gcc-interface/trans.c (gnat_to_gnu) <N_Not_In>: Use
	invert_truthvalue_loc instead of invert_truthvalue.
	* gcc-interface/utils2.c (build_binary_op) <NE_EXPR>: Likewise.
	(build_unary_op) <TRUTH_NOT_EXPR>: Likewise.

From-SVN: r165253

gcc/ada/ChangeLog

 2010-10-10  Eric Botcazou  <ebotcazou@adacore.com>
 
+	* gcc-interface/trans.c (gnat_to_gnu) <N_Not_In>: Use
+	invert_truthvalue_loc instead of invert_truthvalue.
+	* utils2.c (build_binary_op) <NE_EXPR>: Likewise.
+	(build_unary_op) <TRUTH_NOT_EXPR>: Likewise.
+
+2010-10-10  Eric Botcazou  <ebotcazou@adacore.com>
+
 	* gcc-interface/decl.c (gnat_to_gnu_entity) <E_Subprogram_Type>: Add
 	assertion on the types of the parameters.  Use KIND local variable.
 	<E_Incomplete_Type>: Likewise.

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;
 

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: