diff options
| author | Jakub Jelinek <jakub@redhat.com> | 2009-09-01 12:18:34 +0200 |
|---|---|---|
| committer | Jakub Jelinek <jakub@gcc.gnu.org> | 2009-09-01 12:18:34 +0200 |
| commit | 437926c09e3a6425c7b02a6ddd47e731d82a0047 (patch) | |
| tree | 7557b2844944b0d6d697f9f8891a8d179f1292ec /gcc/ada/gcc-interface | |
| parent | d3bc57f2818b12de38aaaa41dcfecf80dd3114e3 (diff) | |
| download | gcc-437926c09e3a6425c7b02a6ddd47e731d82a0047.zip gcc-437926c09e3a6425c7b02a6ddd47e731d82a0047.tar.gz gcc-437926c09e3a6425c7b02a6ddd47e731d82a0047.tar.bz2 | |
boehm.c (mark_reference_fields): Compute % in HOST_WIDE_INT type.
* boehm.c (mark_reference_fields): Compute % in HOST_WIDE_INT
type.
* gcc-interface/utils2.c (maybe_wrap_malloc, maybe_wrap_free): Cast
POINTER_SIZE to HOST_WIDE_INT.
From-SVN: r151263
Diffstat (limited to 'gcc/ada/gcc-interface')
| -rw-r--r-- | gcc/ada/gcc-interface/utils2.c | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/gcc/ada/gcc-interface/utils2.c b/gcc/ada/gcc-interface/utils2.c index e60e5a0..b8ca814 100644 --- a/gcc/ada/gcc-interface/utils2.c +++ b/gcc/ada/gcc-interface/utils2.c @@ -1972,7 +1972,8 @@ maybe_wrap_malloc (tree data_size, tree data_type, Node_Id gnat_node) tree storage_ptr_slot_addr = build_binary_op (POINTER_PLUS_EXPR, ptr_void_type_node, convert (ptr_void_type_node, aligning_field_addr), - size_int (-POINTER_SIZE/BITS_PER_UNIT)); + size_int (-(HOST_WIDE_INT) POINTER_SIZE + / BITS_PER_UNIT)); tree storage_ptr_slot = build_unary_op (INDIRECT_REF, NULL_TREE, @@ -2013,7 +2014,7 @@ maybe_wrap_free (tree data_ptr, tree data_type) = build_binary_op (POINTER_PLUS_EXPR, ptr_void_type_node, convert (ptr_void_type_node, data_ptr), - size_int (-POINTER_SIZE/BITS_PER_UNIT)); + size_int (-(HOST_WIDE_INT) POINTER_SIZE / BITS_PER_UNIT)); /* FREE_PTR (void *) = *(void **)DATA_FRONT_PTR */ free_ptr |