Commit 018479fb by Richard Henderson Committed by Richard Henderson

* print-tree.c (print_node): Handle SSA_NAME.

From-SVN: r84729
parent b5411fea
2004-07-14 Richard Henderson <rth@redhat.com>
* print-tree.c (print_node): Handle SSA_NAME.
2004-07-14 James E Wilson <wilson@specifixinc.com> 2004-07-14 James E Wilson <wilson@specifixinc.com>
PR target/16325 PR target/16325
......
...@@ -731,6 +731,32 @@ print_node (FILE *file, const char *prefix, tree node, int indent) ...@@ -731,6 +731,32 @@ print_node (FILE *file, const char *prefix, tree node, int indent)
BLOCK_ABSTRACT_ORIGIN (node), indent + 4); BLOCK_ABSTRACT_ORIGIN (node), indent + 4);
break; break;
case SSA_NAME:
print_node_brief (file, "var", SSA_NAME_VAR (node), indent + 4);
print_node_brief (file, "def_stmt",
SSA_NAME_DEF_STMT (node), indent + 4);
indent_to (file, indent + 4);
fprintf (file, "version %u", SSA_NAME_VERSION (node));
if (SSA_NAME_OCCURS_IN_ABNORMAL_PHI (node))
fprintf (file, " in-abnormal-phi");
if (SSA_NAME_IN_FREE_LIST (node))
fprintf (file, " in-free-list");
if (SSA_NAME_PTR_INFO (node)
|| SSA_NAME_VALUE (node)
|| SSA_NAME_AUX (node))
{
indent_to (file, indent + 3);
if (SSA_NAME_PTR_INFO (node))
fprintf (file, " ptr-info %p", SSA_NAME_PTR_INFO (node));
if (SSA_NAME_VALUE (node))
fprintf (file, " value %p", SSA_NAME_VALUE (node));
if (SSA_NAME_AUX (node))
fprintf (file, " aux %p", SSA_NAME_AUX (node));
}
break;
default: default:
if (TREE_CODE_CLASS (TREE_CODE (node)) == 'x') if (TREE_CODE_CLASS (TREE_CODE (node)) == 'x')
lang_hooks.print_xnode (file, node, indent); lang_hooks.print_xnode (file, node, indent);
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment