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

	* 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

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 795c2bafeb65ae26a0a2c1a8ff8def4b12840bf5..77305ee612f47084c95082d9d5e727dcf3a927bb 100644 (file)
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -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.

diff --git a/gcc/print-tree.c b/gcc/print-tree.c
index 54a598eea4ecfc798974aa7dc12464459a0849e3..c1f492d858577e4cfc3d2c9abfbcf776631f9dcc 100644 (file)
--- a/gcc/print-tree.c
+++ b/gcc/print-tree.c
@@ -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);