diff options
| author | aldyh <aldyh@138bc75d-0d04-0410-961f-82ee72b054a4> | 2006-12-05 17:26:05 +0000 |
|---|---|---|
| committer | aldyh <aldyh@138bc75d-0d04-0410-961f-82ee72b054a4> | 2006-12-05 17:26:05 +0000 |
| commit | 35cc02b5c80ac6738c1a3362a822e3d7e4d0c587 (patch) | |
| tree | 32d3ee1ddfcad180d619d756a84eeb0df779a6a2 /gcc/print-tree.c | |
| parent | fc297ba47e780c3659434d04f3c299b705154d5f (diff) | |
| download | gcc-35cc02b5c80ac6738c1a3362a822e3d7e4d0c587.tar.gz | |
Merge gimple-tuples-branch into mainline.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@119546 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/print-tree.c')
| -rw-r--r-- | gcc/print-tree.c | 14 |
1 files changed, 13 insertions, 1 deletions
diff --git a/gcc/print-tree.c b/gcc/print-tree.c index 57b07ace4bb..1ed17de8641 100644 --- a/gcc/print-tree.c +++ b/gcc/print-tree.c @@ -263,7 +263,7 @@ print_node (FILE *file, const char *prefix, tree node, int indent) if (indent <= 4) print_node_brief (file, "type", TREE_TYPE (node), indent + 4); } - else + else if (!GIMPLE_TUPLE_P (node)) { print_node (file, "type", TREE_TYPE (node), indent + 4); if (TREE_TYPE (node)) @@ -679,6 +679,18 @@ print_node (FILE *file, const char *prefix, tree node, int indent) print_node (file, "chain", TREE_CHAIN (node), indent + 4); break; + case tcc_gimple_stmt: + len = TREE_CODE_LENGTH (TREE_CODE (node)); + + for (i = 0; i < len; i++) + { + char temp[10]; + + sprintf (temp, "arg %d", i); + print_node (file, temp, GIMPLE_STMT_OPERAND (node, i), indent + 4); + } + break; + case tcc_constant: case tcc_exceptional: switch (TREE_CODE (node)) |