diff options
Diffstat (limited to 'gcc/ada/gcc-interface')
| -rw-r--r-- | gcc/ada/gcc-interface/trans.c | 3 | ||||
| -rw-r--r-- | gcc/ada/gcc-interface/utils2.c | 4 |
2 files changed, 4 insertions, 3 deletions
diff --git a/gcc/ada/gcc-interface/trans.c b/gcc/ada/gcc-interface/trans.c index 36a2462..b644688 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 c40223f..8419170 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: |