diff options
| author | Stuart Hastings <stuart@apple.com> | 2005-03-31 00:09:10 +0000 |
|---|---|---|
| committer | Dale Johannesen <dalej@gcc.gnu.org> | 2005-03-31 00:09:10 +0000 |
| commit | 8df673d74028ff6671f5d5956da1a43235974000 (patch) | |
| tree | 4c9bcf08b5db153f69f7bbd244e9f860d0301d5f /gcc | |
| parent | a8e04fe6ca41fa2280dfdf32b3deed9109d85179 (diff) | |
| download | gcc-8df673d74028ff6671f5d5956da1a43235974000.zip gcc-8df673d74028ff6671f5d5956da1a43235974000.tar.gz gcc-8df673d74028ff6671f5d5956da1a43235974000.tar.bz2 | |
Makefile.in (print-tree.o): Depend on tree-iterator.h.
2005-03-30 Stuart Hastings <stuart@apple.com>
Dale Johannesen <dalej@apple.com>
* Makefile.in (print-tree.o): Depend on tree-iterator.h.
* print-tree.c (print_node): Add case STATEMENT_LIST.
Co-Authored-By: Dale Johannesen <dalej@apple.com>
From-SVN: r97292
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/ChangeLog | 6 | ||||
| -rw-r--r-- | gcc/Makefile.in | 2 | ||||
| -rw-r--r-- | gcc/print-tree.c | 23 |
3 files changed, 30 insertions, 1 deletions
diff --git a/gcc/ChangeLog b/gcc/ChangeLog index d79c6ec..dd95c1b 100644 --- a/gcc/ChangeLog +++ b/gcc/ChangeLog @@ -1,3 +1,9 @@ +2005-03-30 Stuart Hastings <stuart@apple.com> + Dale Johannesen <dalej@apple.com> + + * Makefile.in (print-tree.o): Depend on tree-iterator.h. + * print-tree.c (print_node): Add case STATEMENT_LIST. + 2005-03-31 Alan Modra <amodra@bigpond.net.au> * config.gcc (cpu_is_64bit): Set for 64-bit powerpc cpus. diff --git a/gcc/Makefile.in b/gcc/Makefile.in index 1d12208..fb8e6cb 100644 --- a/gcc/Makefile.in +++ b/gcc/Makefile.in @@ -1617,7 +1617,7 @@ tree-inline.o : tree-inline.c $(CONFIG_H) $(SYSTEM_H) coretypes.h $(TM_H) \ langhooks.h $(C_COMMON_H) tree-inline.h $(CGRAPH_H) intl.h function.h \ pointer-set.h $(TREE_GIMPLE_H) debug.h print-tree.o : print-tree.c $(CONFIG_H) $(SYSTEM_H) coretypes.h $(TM_H) $(TREE_H) \ - $(GGC_H) langhooks.h real.h + $(GGC_H) langhooks.h real.h tree-iterator.h stor-layout.o : stor-layout.c $(CONFIG_H) $(SYSTEM_H) coretypes.h $(TM_H) \ $(TREE_H) $(PARAMS_H) $(FLAGS_H) function.h $(EXPR_H) $(RTL_H) toplev.h \ $(GGC_H) $(TM_P_H) $(TARGET_H) langhooks.h $(REGS_H) gt-stor-layout.h diff --git a/gcc/print-tree.c b/gcc/print-tree.c index 55bb6ed..873d11b 100644 --- a/gcc/print-tree.c +++ b/gcc/print-tree.c @@ -28,6 +28,7 @@ Software Foundation, 59 Temple Place - Suite 330, Boston, MA #include "real.h" #include "ggc.h" #include "langhooks.h" +#include "tree-iterator.h" /* Define the hash table of nodes already seen. Such nodes are not repeated; brief cross-references are used. */ @@ -723,6 +724,28 @@ print_node (FILE *file, const char *prefix, tree node, int indent) } break; + case STATEMENT_LIST: + fprintf (file, " head " HOST_PTR_PRINTF " tail " HOST_PTR_PRINTF " stmts", + (void *) node->stmt_list.head, (void *) node->stmt_list.tail); + { + tree_stmt_iterator i; + for (i = tsi_start (node); !tsi_end_p (i); tsi_next (&i)) + { + /* Not printing the addresses of the (not-a-tree) + 'struct tree_stmt_list_node's. */ + fprintf (file, " " HOST_PTR_PRINTF, (void *)tsi_stmt (i)); + } + fprintf (file, "\n"); + for (i = tsi_start (node); !tsi_end_p (i); tsi_next (&i)) + { + /* Not printing the addresses of the (not-a-tree) + 'struct tree_stmt_list_node's. */ + print_node (file, "stmt", tsi_stmt (i), indent + 4); + } + } + print_node (file, "chain", TREE_CHAIN (node), indent + 4); + break; + case BLOCK: print_node (file, "vars", BLOCK_VARS (node), indent + 4); print_node (file, "supercontext", BLOCK_SUPERCONTEXT (node), |