* utils.c (gnat_init_decl_processing): Ada has a signed sizetype.

From-SVN: r86656

diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index b4f9ec5824827d6d829e2a25e9669a50866a9c95..27f6361a0ffca626e531814e355e727de8faf21f 100644 (file)
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
@@ -1,3 +1,7 @@
+2004-08-27  Nathan Sidwell  <nathan@codesourcery.com>
+
+       * utils.c (gnat_init_decl_processing): Ada has a signed sizetype.
+
 2004-08-27  Andreas Schwab  <schwab@suse.de>
 
        * Make-lang.in (EXTRA_GNATBIND_OBJS): Add errors.o.

diff --git a/gcc/ada/utils.c b/gcc/ada/utils.c
index 0cc6c987514acc999569060c7de5ffdf6119332b..9d6a17e2c5b77fa66708768e8a055518cdd6f26c 100644 (file)
--- a/gcc/ada/utils.c
+++ b/gcc/ada/utils.c
@@ -381,7 +381,7 @@ gnat_init_decl_processing (void)
   free_binding_level = 0;
   gnat_pushlevel ();
 
-  build_common_tree_nodes (false, false);
+  build_common_tree_nodes (false, true);
 
   /* In Ada, we use a signed type for SIZETYPE.  Use the signed type
      corresponding to the size of Pmode.  In most cases when ptr_mode and