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

From-SVN: r86656

* utils.c (gnat_init_decl_processing): Ada has a signed sizetype.
From-SVN: r86656
6a6bfc8e · Nathan Sidwell · Nathan Sidwell · f8b7bf58 · 6a6bfc8e · 6a6bfc8e
Commit 6a6bfc8e authored 20 years ago by Nathan Sidwell Committed by Nathan Sidwell 20 years ago
Hide whitespace changes
Inline Side-by-side

Showing with 5 additions and 1 deletions

gcc/ada/ChangeLog
+4 -0

gcc/ada/utils.c
+1 -1

No files found.
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
+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.

--- 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