diff options
| author | rguenth <rguenth@138bc75d-0d04-0410-961f-82ee72b054a4> | 2010-09-10 10:54:24 +0000 |
|---|---|---|
| committer | rguenth <rguenth@138bc75d-0d04-0410-961f-82ee72b054a4> | 2010-09-10 10:54:24 +0000 |
| commit | 65ae98b48ba6e64af5ec11657a203a5ff3bffe89 (patch) | |
| tree | 52bbfc8b0f568a45141cb55233730665d6be7f43 /gcc | |
| parent | 2787ab7648835f75b25d8b35408a6dee3f85b64c (diff) | |
| download | ppe42-gcc-65ae98b48ba6e64af5ec11657a203a5ff3bffe89.tar.gz ppe42-gcc-65ae98b48ba6e64af5ec11657a203a5ff3bffe89.zip | |
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.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@164164 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc')
| -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 3a5139997bd..0c5b0ed28fb 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 c1611e5c471..6092a21743a 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 c3a39d44357..cadc4d7c0da 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) diff --git a/gcc/tree.c b/gcc/tree.c index 677e3bbf7e4..7ea69c8cbc5 100644 --- a/gcc/tree.c +++ b/gcc/tree.c @@ -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. */ diff --git a/gcc/tree.h b/gcc/tree.h index 96555e2eecc..4fc6725e653 100644 --- a/gcc/tree.h +++ b/gcc/tree.h @@ -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, ...); |
