diff options
author | Richard Kenner <kenner@vlsi1.ultra.nyu.edu> | 2004-04-01 03:50:43 +0000 |
---|---|---|
committer | Richard Kenner <kenner@gcc.gnu.org> | 2004-03-31 22:50:43 -0500 |
commit | 8df83eae1ed8f8f7cfb653bdeb14f2b5071d7c4f (patch) | |
tree | cdd0771bc6e7a796038424b013a8a89e08667dea /gcc/ada/utils.c | |
parent | d9175b871cddac9b9d3c7216bf3a8f665539d782 (diff) | |
download | gcc-8df83eae1ed8f8f7cfb653bdeb14f2b5071d7c4f.zip gcc-8df83eae1ed8f8f7cfb653bdeb14f2b5071d7c4f.tar.gz gcc-8df83eae1ed8f8f7cfb653bdeb14f2b5071d7c4f.tar.bz2 |
builtins.c, [...]: Change most occurrences of TREE_UNSIGNED to TYPE_UNSIGNED.
* builtins.c, c-aux-info.c, c-common.c, c-cppbuiltin.c, c-decl.c:
Change most occurrences of TREE_UNSIGNED to TYPE_UNSIGNED.
* c-format.c, c-opts.c, c-pretty-print.c, c-typeck.c: Likewise.
* calls.c, convert.c, dbxout.c, dojump.c, dwarf2out.c: Likewise.
* expmed.c, expr.c, fold-const.c, function.c, integrate.c: Likewise.
* optabs.c, sdbout.c, stmt.c, stor-layout.c, tree-dump.c: Likewise.
* tree.c, config/iq2000/iq2000.c, config/m32r/m32r.c: Likewise.
* config/mips/mips.c, config/rs6000/rs6000.c: Likewise.
* config/s390/s390.c, config/sparc/sparc.c, objc/objc-act.c: Likewise.
* stor-layout.c (layout_type, case COMPLEX_TYPE): Test for
REAL_TYPE, not INTEGER_TYPE.
(layout_type, case VECTOR_TYPE): Simplify code.
* tree.c (build_vector_type_for_mode): Remove dup unsigned setting.
* tree.h: Update comments.
(STRIP_NOPS): Use TYPE_UNSIGNED.
(TYPE_UNSIGNED): New macro.
(TYPE_TRAP_SIGNED): Remove now redundant check.
(SAVE_EXPR_NOPLACEHOLDER): Don't use TREE_UNSIGNED.
* cp/call.c (joust): Use TYPE_UNSIGNED, not TREE_UNSIGNED.
* cp/class.c (check_bitfield_decl): Likewise.
* cp/cvt.c (type_promotes_to): Likewise.
* cp/decl.c (finish_enum): Likewise.
* cp/mangle.c (write_builtin_type): Likewise.
* cp/semantics.c (finish_switch_cond, finish_unary_op_expr): Likewise.
* cp/typeck.c (type_after_usual_arithmetic_conversions): Likewise.
(build_binary_op): Likewise.
* f/com.c (ffecom_arrayref_): Use TYPE_UNSIGNED, not TREE_UNSIGNED.
(ffecom_expr_): Likewise.
* java/jcf-write.c (generate_bytecode_insns): Use TYPE_UNSIGNED.
* treelang/treetree.c (tree_lang_signed_or_unsigned_type):
Use TYPE_UNSIGNED, not TREE_UNSIGNED.
* ada/decl.c (gnat_to_gnu_entity, make_type_from_size):
Use TYPE_UNSIGNED, not TREE_UNSIGNED.
* ada/trans.c (tree_transform, convert_with_check): Likewise.
* ada/utils.c (gnat_signed_or_unsigned_type): Likewise.
(build_vms_descriptor, unchecked_convert): Likewise.
* ada/utils2.c (nonbinary_modular_operation): Likewise.
From-SVN: r80287
Diffstat (limited to 'gcc/ada/utils.c')
-rw-r--r-- | gcc/ada/utils.c | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/gcc/ada/utils.c b/gcc/ada/utils.c index 1c012fe..3fba0c0 100644 --- a/gcc/ada/utils.c +++ b/gcc/ada/utils.c @@ -2118,7 +2118,7 @@ gnat_signed_type (tree type_node) tree gnat_signed_or_unsigned_type (int unsignedp, tree type) { - if (! INTEGRAL_TYPE_P (type) || TREE_UNSIGNED (type) == unsignedp) + if (! INTEGRAL_TYPE_P (type) || TYPE_UNSIGNED (type) == unsignedp) return type; else return gnat_type_for_size (TYPE_PRECISION (type), unsignedp); @@ -2355,19 +2355,19 @@ build_vms_descriptor (tree type, Mechanism_Type mech, Entity_Id gnat_entity) switch (GET_MODE_BITSIZE (TYPE_MODE (type))) { case 8: - dtype = TREE_UNSIGNED (type) ? 2 : 6; + dtype = TYPE_UNSIGNED (type) ? 2 : 6; break; case 16: - dtype = TREE_UNSIGNED (type) ? 3 : 7; + dtype = TYPE_UNSIGNED (type) ? 3 : 7; break; case 32: - dtype = TREE_UNSIGNED (type) ? 4 : 8; + dtype = TYPE_UNSIGNED (type) ? 4 : 8; break; case 64: - dtype = TREE_UNSIGNED (type) ? 5 : 9; + dtype = TYPE_UNSIGNED (type) ? 5 : 9; break; case 128: - dtype = TREE_UNSIGNED (type) ? 25 : 26; + dtype = TYPE_UNSIGNED (type) ? 25 : 26; break; } break; @@ -3388,15 +3388,15 @@ unchecked_convert (tree type, tree expr, int notrunc_p) && 0 != compare_tree_int (TYPE_RM_SIZE (type), GET_MODE_BITSIZE (TYPE_MODE (type))) && ! (INTEGRAL_TYPE_P (etype) - && TREE_UNSIGNED (type) == TREE_UNSIGNED (etype) + && TYPE_UNSIGNED (type) == TYPE_UNSIGNED (etype) && operand_equal_p (TYPE_RM_SIZE (type), (TYPE_RM_SIZE (etype) != 0 ? TYPE_RM_SIZE (etype) : TYPE_SIZE (etype)), 0)) - && ! (TREE_UNSIGNED (type) && TREE_UNSIGNED (etype))) + && ! (TYPE_UNSIGNED (type) && TYPE_UNSIGNED (etype))) { tree base_type = gnat_type_for_mode (TYPE_MODE (type), - TREE_UNSIGNED (type)); + TYPE_UNSIGNED (type)); tree shift_expr = convert (base_type, size_binop (MINUS_EXPR, |