From: Nathan Sidwell <nathan@codesourcery.com>
Date: Fri, 27 Aug 2004 10:02:30 +0000 (+0000)
Subject: * utils.c (gnat_init_decl_processing): Ada has a signed sizetype.
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=6a6bfc8e70897234a262527a07d80b6036282b8e;p=gcc.git

* 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 b4f9ec58248..27f6361a0ff 100644
--- 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 0cc6c987514..9d6a17e2c5b 100644
--- 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