diff options
| author | Richard Guenther <rguenther@suse.de> | 2007-01-08 18:29:18 +0000 |
|---|---|---|
| committer | Richard Biener <rguenth@gcc.gnu.org> | 2007-01-08 18:29:18 +0000 |
| commit | 7fb41a42a9490e41b03fe1bcfe0d3903fd8c0372 (patch) | |
| tree | 39d3113999a59bc49ff73a06408842ee861973fd /gcc/fortran | |
| parent | 738a52d3e27cc81e337c3f57e845adc0dd666eaa (diff) | |
| download | gcc-7fb41a42a9490e41b03fe1bcfe0d3903fd8c0372.zip gcc-7fb41a42a9490e41b03fe1bcfe0d3903fd8c0372.tar.gz gcc-7fb41a42a9490e41b03fe1bcfe0d3903fd8c0372.tar.bz2 | |
tree-ssa-ccp.c (maybe_fold_offset_to_array_ref): Use type of offset to build the index.
2007-01-08 Richard Guenther <rguenther@suse.de>
* tree-ssa-ccp.c (maybe_fold_offset_to_array_ref): Use type
of offset to build the index.
* tree-pretty-print.c (dump_generic_node): Don't build negated
const just for printing.
* c-pretty-print.c (pp_c_integer_constant): Likewise.
* builtins.c (fold_builtin_int_roundingfn): Check if result
fits the type by using force_fit_type and comparing the result.
* predict.c (predict_loops): Use compare_tree_int for comparison.
* tree.c (build_int_cst): Fall back to integer_type_node for
NULL_TREE type.
(build_int_cst_wide): Assert type is non-null.
fortran/
* trans-io.c (transfer_array_desc): Use build_int_cst instead
of build_int_cstu.
From-SVN: r120586
Diffstat (limited to 'gcc/fortran')
| -rw-r--r-- | gcc/fortran/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/fortran/trans-io.c | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index 5ec612c..a31c8ac 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,3 +1,8 @@ +2007-01-08 Richard Guenther <rguenther@suse.de> + + * trans-io.c (transfer_array_desc): Use build_int_cst instead + of build_int_cstu. + 2007-01-08 Roger Sayle <roger@eyesopen.com> * trans-array.c (constant_array_constructor_p): New function to diff --git a/gcc/fortran/trans-io.c b/gcc/fortran/trans-io.c index b24a2f2..654c0fa 100644 --- a/gcc/fortran/trans-io.c +++ b/gcc/fortran/trans-io.c @@ -1779,7 +1779,7 @@ transfer_array_desc (gfc_se * se, gfc_typespec * ts, tree addr_expr) if (ts->type == BT_CHARACTER) charlen_arg = se->string_length; else - charlen_arg = build_int_cstu (NULL_TREE, 0); + charlen_arg = build_int_cst (NULL_TREE, 0); kind_arg = build_int_cst (NULL_TREE, ts->kind); |