* dbxout.c (dbxout_type): Emit size information for range types,

	as well, but only when using GDB extensions.

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

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index ef6a4cf..d18f1b6 100644 (file)
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,8 @@
+2002-05-01  Joel Brobecker  <brobecker@gnat.com>
+
+       * dbxout.c (dbxout_type): Emit size information for range types,
+       as well, but only when using GDB extensions.
+
 2002-05-01  Richard Henderson  <rth@redhat.com>
 
        * configure.in (HAVE_GAS_HIDDEN): Replace SPARC feature test with

diff --git a/gcc/dbxout.c b/gcc/dbxout.c
index da3c842..383f469 100644 (file)
--- a/gcc/dbxout.c
+++ b/gcc/dbxout.c
@@ -1219,7 +1219,20 @@ dbxout_type (type, full)
         write it as a subtype.  */
       else if (TREE_TYPE (type) != 0
               && TREE_CODE (TREE_TYPE (type)) == INTEGER_TYPE)
-       dbxout_range_type (type);
+        {
+         /* If the size is non-standard, say what it is if we can use
+            GDB extensions.  */
+
+         if (use_gnu_debug_info_extensions
+             && TYPE_PRECISION (type) != TYPE_PRECISION (integer_type_node))
+           {
+             have_used_extensions = 1;
+             fprintf (asmfile, "@s%d;", TYPE_PRECISION (type));
+             CHARS (5);
+           }
+
+         dbxout_range_type (type);
+        }
 
       else
        {