2010-09-10 Richard Guenther <rguenther@suse.de>
authorrguenth <rguenth@138bc75d-0d04-0410-961f-82ee72b054a4>
Fri, 10 Sep 2010 10:54:24 +0000 (10:54 +0000)
committerrguenth <rguenth@138bc75d-0d04-0410-961f-82ee72b054a4>
Fri, 10 Sep 2010 10:54:24 +0000 (10:54 +0000)
* 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

gcc/ChangeLog
gcc/ada/ChangeLog
gcc/ada/gcc-interface/utils.c
gcc/tree.c
gcc/tree.h

index 3a51399..0c5b0ed 100644 (file)
@@ -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
index c1611e5..6092a21 100644 (file)
@@ -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.
index c3a39d4..cadc4d7 100644 (file)
@@ -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)
index 677e3bb..7ea69c8 100644 (file)
@@ -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.  */
index 96555e2..4fc6725 100644 (file)
@@ -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, ...);