(build_{index,range}_type): Ensure expressions for min and max value

are in same obstack as type.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@13722 138bc75d-0d04-0410-961f-82ee72b054a4

diff --git a/gcc/tree.c b/gcc/tree.c
index 2a2eef3..f09c36a 100644 (file)
--- a/gcc/tree.c
+++ b/gcc/tree.c
@@ -3801,10 +3801,14 @@ build_index_type (maxval)
      tree maxval;
 {
   register tree itype = make_node (INTEGER_TYPE);
      tree maxval;
 {
   register tree itype = make_node (INTEGER_TYPE);

+

   TYPE_PRECISION (itype) = TYPE_PRECISION (sizetype);
   TYPE_PRECISION (itype) = TYPE_PRECISION (sizetype);

-  TYPE_MIN_VALUE (itype) = build_int_2 (0, 0);
-  TREE_TYPE (TYPE_MIN_VALUE (itype)) = sizetype;
+  TYPE_MIN_VALUE (itype) = size_zero_node;
+
+  push_obstacks (TYPE_OBSTACK (itype), TYPE_OBSTACK (itype));

   TYPE_MAX_VALUE (itype) = convert (sizetype, maxval);
   TYPE_MAX_VALUE (itype) = convert (sizetype, maxval);

+  pop_obstacks ();
+

   TYPE_MODE (itype) = TYPE_MODE (sizetype);
   TYPE_SIZE (itype) = TYPE_SIZE (sizetype);
   TYPE_ALIGN (itype) = TYPE_ALIGN (sizetype);
   TYPE_MODE (itype) = TYPE_MODE (sizetype);
   TYPE_SIZE (itype) = TYPE_SIZE (sizetype);
   TYPE_ALIGN (itype) = TYPE_ALIGN (sizetype);


@@ -3834,12 +3838,17 @@ build_range_type (type, lowval, highval)
      tree type, lowval, highval;
 {
   register tree itype = make_node (INTEGER_TYPE);
      tree type, lowval, highval;
 {
   register tree itype = make_node (INTEGER_TYPE);

+

   TREE_TYPE (itype) = type;
   if (type == NULL_TREE)
     type = sizetype;
   TREE_TYPE (itype) = type;
   if (type == NULL_TREE)
     type = sizetype;

-  TYPE_PRECISION (itype) = TYPE_PRECISION (type);
+
+  push_obstacks (TYPE_OBSTACK (itype), TYPE_OBSTACK (itype));

   TYPE_MIN_VALUE (itype) = convert (type, lowval);
   TYPE_MAX_VALUE (itype) = convert (type, highval);
   TYPE_MIN_VALUE (itype) = convert (type, lowval);
   TYPE_MAX_VALUE (itype) = convert (type, highval);

+  pop_obstacks ();
+
+  TYPE_PRECISION (itype) = TYPE_PRECISION (type);

   TYPE_MODE (itype) = TYPE_MODE (type);
   TYPE_SIZE (itype) = TYPE_SIZE (type);
   TYPE_ALIGN (itype) = TYPE_ALIGN (type);
   TYPE_MODE (itype) = TYPE_MODE (type);
   TYPE_SIZE (itype) = TYPE_SIZE (type);
   TYPE_ALIGN (itype) = TYPE_ALIGN (type);