diff options
| author | Richard Guenther <rguenther@suse.de> | 2010-09-10 10:54:24 +0000 |
|---|---|---|
| committer | Richard Biener <rguenth@gcc.gnu.org> | 2010-09-10 10:54:24 +0000 |
| commit | 88df93ce3baa8e070122533b31928d3876138488 (patch) | |
| tree | 52bbfc8b0f568a45141cb55233730665d6be7f43 | |
| parent | 40ed057ba7ce8b8a00d88aae5ce14133faa83fd0 (diff) | |
| download | gcc-88df93ce3baa8e070122533b31928d3876138488.zip gcc-88df93ce3baa8e070122533b31928d3876138488.tar.gz gcc-88df93ce3baa8e070122533b31928d3876138488.tar.bz2 | |
tree.h (build_index_2_type): Remove.
2010-09-10 Richard Guenther <rguenther@suse.de>
* tree.h (build_index_2_type): Remove.
* tree.c (build_index_2_type): Remove.
ada/gcc-interface/
* utils.c (create_index_type): Use build_range_type.
From-SVN: r164164
| -rw-r--r-- | gcc/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/ada/ChangeLog | 4 | ||||
| -rw-r--r-- | gcc/ada/gcc-interface/utils.c | 2 | ||||
| -rw-r--r-- | gcc/tree.c | 9 | ||||
| -rw-r--r-- | gcc/tree.h | 1 |
5 files changed, 10 insertions, 11 deletions
diff --git a/gcc/ChangeLog b/gcc/ChangeLog index 3a513999..0c5b0ed 100644 --- a/gcc/ChangeLog +++ b/gcc/ChangeLog @@ -1,3 +1,8 @@ +2010-09-10 Richard Guenther <rguenther@suse.de> + + * tree.h (build_index_2_type): Remove. + * tree.c (build_index_2_type): Remove. + 2010-09-10 Jakub Jelinek <jakub@redhat.com> PR bootstrap/45630 diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index c1611e5..6092a21 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,7 @@ +2010-09-10 Richard Guenther <rguenther@suse.de> + + * gcc-interface/utils.c (create_index_type): Use build_range_type. + 2010-09-10 Arnaud Charlet <charlet@adacore.com> * vms_cmds.ads: New. diff --git a/gcc/ada/gcc-interface/utils.c b/gcc/ada/gcc-interface/utils.c index c3a39d4..cadc4d7 100644 --- a/gcc/ada/gcc-interface/utils.c +++ b/gcc/ada/gcc-interface/utils.c @@ -1156,7 +1156,7 @@ tree create_index_type (tree min, tree max, tree index, Node_Id gnat_node) { /* First build a type for the desired range. */ - tree type = build_index_2_type (min, max); + tree type = build_range_type (sizetype, min, max); /* If this type has the TYPE_INDEX_TYPE we want, return it. */ if (TYPE_INDEX_TYPE (type) == index) @@ -7191,15 +7191,6 @@ subrange_type_for_debug_p (const_tree type, tree *lowval, tree *highval) return true; } -/* Just like build_index_type, but takes lowval and highval instead - of just highval (maxval). */ - -tree -build_index_2_type (tree lowval, tree highval) -{ - return build_range_type (sizetype, lowval, highval); -} - /* Construct, lay out and return the type of arrays of elements with ELT_TYPE and number of elements specified by the range of values of INDEX_TYPE. If such a type has already been constructed, reuse it. */ @@ -4086,7 +4086,6 @@ extern tree build_vector_type (tree innertype, int nunits); extern tree build_opaque_vector_type (tree innertype, int nunits); extern tree build_type_no_quals (tree); extern tree build_index_type (tree); -extern tree build_index_2_type (tree, tree); extern tree build_array_type (tree, tree); extern tree build_function_type (tree, tree); extern tree build_function_type_list (tree, ...); |