diff options
| author | Richard Guenther <rguenther@suse.de> | 2007-01-08 22:53:20 +0000 |
|---|---|---|
| committer | Richard Biener <rguenth@gcc.gnu.org> | 2007-01-08 22:53:20 +0000 |
| commit | 2ac7cbb53296e6006d7c113d81175dd455fd570b (patch) | |
| tree | c7ad9e6d3d7b86c201aaecf9a0017fb8badea1c3 /gcc/ada | |
| parent | 1c61ff294690d6ce7c9e958f62ab48a441943844 (diff) | |
| download | gcc-2ac7cbb53296e6006d7c113d81175dd455fd570b.zip gcc-2ac7cbb53296e6006d7c113d81175dd455fd570b.tar.gz gcc-2ac7cbb53296e6006d7c113d81175dd455fd570b.tar.bz2 | |
tree.h (build_int_cst_wide_type): Export.
2007-01-08 Richard Guenther <rguenther@suse.de>
* tree.h (build_int_cst_wide_type): Export.
* tree.c (build_int_cst_wide_type): New function.
(build_int_cst_wide): Fix comment.
* builtins.c (fold_builtin_object_size): Use build_int_cst
to build -1 or 0 of the correct type. Use fit_double_type
to check for overflow.
* fold-const.c (optimize_bit_field_compare): Use build_int_cst_type
to build the mask.
(decode_field_reference): Likewise.
(all_ones_mask_p): Likewise.
(native_interpret_int): Use build_int_cst_wide_type.
(fold_binary): Use build_int_cst_type to build an all-ones
value.
* stor-layout.c (set_sizetype): Use build_int_cst_wide_type.
java/
* lex.c (do_java_lex): Use build_int_cst_wide_type.
* jcf-parse.c (get_constant): Likewise.
cp/
* cvt.c (cp_convert_to_pointer): Use build_int_cst_type.
ada/
* cuintp.c (build_cst_from_int): Use built_int_cst_type.
* trans.c (gnat_to_gnu): Likewise.
From-SVN: r120596
Diffstat (limited to 'gcc/ada')
| -rw-r--r-- | gcc/ada/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/ada/cuintp.c | 2 | ||||
| -rw-r--r-- | gcc/ada/trans.c | 6 |
3 files changed, 8 insertions, 5 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index e8361c2..af2d893 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,8 @@ +2007-01-08 Richard Guenther <rguenther@suse.de> + + * cuintp.c (build_cst_from_int): Use built_int_cst_type. + * trans.c (gnat_to_gnu): Likewise. + 2006-12-07 Geoffrey Keating <geoffk@apple.com> * Makefile.in: Replace CROSS_COMPILE with CROSS_DIRECTORY_STRUCTURE. diff --git a/gcc/ada/cuintp.c b/gcc/ada/cuintp.c index 7adc057..fbf800f 100644 --- a/gcc/ada/cuintp.c +++ b/gcc/ada/cuintp.c @@ -62,7 +62,7 @@ build_cst_from_int (tree type, HOST_WIDE_INT low) if (TREE_CODE (type) == REAL_TYPE) return convert (type, build_int_cst (NULL_TREE, low)); else - return force_fit_type (build_int_cst (type, low), false, false, false); + return build_int_cst_type (type, low); } /* Similar to UI_To_Int, but return a GCC INTEGER_CST or REAL_CST node, diff --git a/gcc/ada/trans.c b/gcc/ada/trans.c index b19f2f5..14c059d 100644 --- a/gcc/ada/trans.c +++ b/gcc/ada/trans.c @@ -2729,10 +2729,8 @@ gnat_to_gnu (Node_Id gnat_node) gnu_result = DECL_INITIAL (get_gnu_tree (Entity (gnat_node))); else gnu_result - = force_fit_type - (build_int_cst - (gnu_result_type, UI_To_CC (Char_Literal_Value (gnat_node))), - false, false, false); + = build_int_cst_type + (gnu_result_type, UI_To_CC (Char_Literal_Value (gnat_node))); break; case N_Real_Literal: |