mirror/gcc
2
0
Fork 0
mirror of git://gcc.gnu.org/git/gcc.git synced 2025-04-22 17:40:45 +08:00
Code Issues Packages Projects Releases Wiki Activity

/tmp/pl

Browse Source 
From-SVN: r42283
This commit is contained in:
Richard Kenner 2001-05-18 20:43:43 +00:00 committed by Richard Kenner
parent 63f36be6e7
commit 3342b6fdab
2 changed files with 20 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
gcc/ChangeLog
View File

@ -1,3 +1,9 @@
Fri May 18 07:26:34 2001 Richard Kenner <kenner@vlsi1.ultra.nyu.edu>
* dbxout.c (dbxout_type): Use host_integerp.
(dbxout_symbol, case TYPE_DECL): Don't generate tag for records of
variable size.
2001-05-18 Stan Shebs <shebs@apple.com>
* configure.in (gcc_cv_as_eh_frame): Cope with old assemblers.

23
gcc/dbxout.c
View File

@ -1069,7 +1069,7 @@ dbxout_type (type, full, show_arg_types)
Sun dbx crashes if we do. */
if (! full || !COMPLETE_TYPE_P (type)
/* No way in DBX fmt to describe a variable size. */
|| TREE_CODE (TYPE_SIZE (type)) != INTEGER_CST)
|| ! host_integerp (TYPE_SIZE (type), 1))
return;
break;
case TYPE_DEFINED:
@ -1094,7 +1094,7 @@ dbxout_type (type, full, show_arg_types)
&& !full)
|| !COMPLETE_TYPE_P (type)
/* No way in DBX fmt to describe a variable size. */
|| TREE_CODE (TYPE_SIZE (type)) != INTEGER_CST)
|| ! host_integerp (TYPE_SIZE (type), 1))
{
typevec[TYPE_SYMTAB_ADDRESS (type)].status = TYPE_XREF;
return;
@ -1146,7 +1146,7 @@ dbxout_type (type, full, show_arg_types)
/* If this is a subtype of another integer type, always prefer to
write it as a subtype. */
else if (TREE_TYPE (type) != 0
&& TREE_CODE (TREE_TYPE (type)) == INTEGER_CST)
&& TREE_CODE (TREE_TYPE (type)) == INTEGER_TYPE)
dbxout_range_type (type);
else
@ -1176,7 +1176,8 @@ dbxout_type (type, full, show_arg_types)
&& TYPE_MAX_VALUE (type) != 0
&& TREE_CODE (TYPE_MAX_VALUE (type)) == INTEGER_CST
&& (TYPE_PRECISION (type) > TYPE_PRECISION (integer_type_node)
|| (TYPE_PRECISION (type) == TYPE_PRECISION (integer_type_node)
|| ((TYPE_PRECISION (type)
== TYPE_PRECISION (integer_type_node))
&& TREE_UNSIGNED (type))
|| TYPE_PRECISION (type) > HOST_BITS_PER_WIDE_INT
|| (TYPE_PRECISION (type) == HOST_BITS_PER_WIDE_INT
@ -1363,7 +1364,7 @@ dbxout_type (type, full, show_arg_types)
&& !full)
|| !COMPLETE_TYPE_P (type)
/* No way in DBX fmt to describe a variable size. */
|| TREE_CODE (TYPE_SIZE (type)) != INTEGER_CST)
|| ! host_integerp (TYPE_SIZE (type), 1))
{
/* If the type is just a cross reference, output one
and mark the type as partially described.
@ -1810,7 +1811,11 @@ dbxout_symbol (decl, local)
&& !TREE_ASM_WRITTEN (TYPE_NAME (type))
/* Distinguish the implicit typedefs of C++
from explicit ones that might be found in C. */
&& DECL_ARTIFICIAL (decl))
&& DECL_ARTIFICIAL (decl)
/* Do not generate a tag for records of variable size,
since this type can not be properly described in the
DBX format, and it confuses some tools such as objdump. */
&& ! host_integerp (TYPE_SIZE (type), 1))
{
tree name = TYPE_NAME (type);
if (TREE_CODE (name) == TYPE_DECL)
@ -1859,9 +1864,9 @@ dbxout_symbol (decl, local)
did_output = 1;
}
/* Don't output a tag if this is an incomplete type (TYPE_SIZE is
zero). This prevents the sun4 Sun OS 4.x dbx from crashing. */
/* Don't output a tag if this is an incomplete type. This prevents
the sun4 Sun OS 4.x dbx from crashing. */
if (tag_needed && TYPE_NAME (type) != 0
&& (TREE_CODE (TYPE_NAME (type)) == IDENTIFIER_NODE
|| (DECL_NAME (TYPE_NAME (type)) != 0))