diff options
author | Tomas Bily <tbily@suse.cz> | 2008-05-12 16:20:35 +0200 |
---|---|---|
committer | Tomas Bily <tomby@gcc.gnu.org> | 2008-05-12 16:20:35 +0200 |
commit | 751d1520c31199d7a67e8c3caaed4e4af90fcb75 (patch) | |
tree | 4f9197dd372e807b35158d95c6870719d2c538c5 /gcc/ada/utils.c | |
parent | 63a906f02b620920f146512e2c5572b2ae5314f8 (diff) | |
download | gcc-751d1520c31199d7a67e8c3caaed4e4af90fcb75.zip gcc-751d1520c31199d7a67e8c3caaed4e4af90fcb75.tar.gz gcc-751d1520c31199d7a67e8c3caaed4e4af90fcb75.tar.bz2 |
* utils2.c (known_alignment, contains_save_expr_p)
(gnat_mark_addressable): Use CASE_CONVERT.
* decl.c (annotate_value): Likewise.
* trans.c (maybe_stabilize_reference): Likewise.
* utils2.c (build_binary_op): Use CONVERT_EXPR_P.
* utils.c (rest_of_record_type_compilation): Likewise.
* trans.c (protect_multiple_eval, Attribute_to_gnu)
(protect_multiple_eval): Likewise.
From-SVN: r135215
Diffstat (limited to 'gcc/ada/utils.c')
-rw-r--r-- | gcc/ada/utils.c | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/gcc/ada/utils.c b/gcc/ada/utils.c index 1cce8da..202818d 100644 --- a/gcc/ada/utils.c +++ b/gcc/ada/utils.c @@ -1096,8 +1096,7 @@ rest_of_record_type_compilation (tree record_type) /* Strip off any conversions. */ while (TREE_CODE (offset) == NON_LVALUE_EXPR - || TREE_CODE (offset) == NOP_EXPR - || TREE_CODE (offset) == CONVERT_EXPR) + || CONVERT_EXPR_P (offset)) offset = TREE_OPERAND (offset, 0); /* An offset which is a bitwise AND with a negative power of 2 @@ -3788,7 +3787,7 @@ remove_conversions (tree exp, bool true_address) break; case VIEW_CONVERT_EXPR: case NON_LVALUE_EXPR: - case NOP_EXPR: case CONVERT_EXPR: + CASE_CONVERT: return remove_conversions (TREE_OPERAND (exp, 0), true_address); default: |