print-tree.c (print_node): Don't print "regdecl" when bit doesn't mean that; use proper names instead.

* print-tree.c (print_node): Don't print "regdecl" when bit doesn't
	mean that; use proper names instead.
	Print DECL_NO_STATIC_CHAIN.

From-SVN: r42795
This commit is contained in:
Richard Kenner 2001-06-02 10:56:44 +00:00 committed by Richard Kenner
parent a27250499c
commit 3af78b060b
2 changed files with 11 additions and 1 deletions

View File

@ -1,5 +1,9 @@
Sat Jun 2 06:53:50 2001 Richard Kenner <kenner@vlsi1.ultra.nyu.edu>
* print-tree.c (print_node): Don't print "regdecl" when bit doesn't
mean that; use proper names instead.
Print DECL_NO_STATIC_CHAIN.
* except.c (expand_builtin_frob_return_addr): Add missing call
to convert_memory_address #ifdef POINTERS_EXTEND_UNSIGNED.
(expand_builtin_eh_return): Likewise.

View File

@ -325,7 +325,9 @@ print_node (file, prefix, node, indent)
fputs (" common", file);
if (DECL_EXTERNAL (node))
fputs (" external", file);
if (DECL_REGISTER (node))
if (DECL_REGISTER (node) && TREE_CODE (node) != FIELD_DECL
&& TREE_CODE (node) != FUNCTION_DECL
&& TREE_CODE (node) != LABEL_DECL)
fputs (" regdecl", file);
if (DECL_NONLOCAL (node))
fputs (" nonlocal", file);
@ -339,6 +341,8 @@ print_node (file, prefix, node, indent)
fputs (" built-in", file);
if (TREE_CODE (node) == FUNCTION_DECL && DECL_BUILT_IN_NONANSI (node))
fputs (" built-in-nonansi", file);
if (TREE_CODE (node) == FUNCTION_DECL && DECL_NO_STATIC_CHAIN (node))
fputs (" no-static-chain", file);
if (TREE_CODE (node) == FIELD_DECL && DECL_PACKED (node))
fputs (" packed", file);
@ -349,6 +353,8 @@ print_node (file, prefix, node, indent)
if (TREE_CODE (node) == LABEL_DECL && DECL_TOO_LATE (node))
fputs (" too-late", file);
if (TREE_CODE (node) == LABEL_DECL && DECL_ERROR_ISSUED (node))
fputs (" error-issued", file);
if (TREE_CODE (node) == VAR_DECL && DECL_IN_TEXT_SECTION (node))
fputs (" in-text-section", file);