* Makefile.in (tree-dump.o): Depend on tree-iterator.h.

        * tree-dump.c (dequeue_and_dump): Dump STATEMENT_LISTs.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@82105 138bc75d-0d04-0410-961f-82ee72b054a4

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 943e5de..07bc921 100644 (file)
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,8 @@
+2004-05-21  Richard Henderson  <rth@redhat.com>
+
+       * Makefile.in (tree-dump.o): Depend on tree-iterator.h.
+       * tree-dump.c (dequeue_and_dump): Dump STATEMENT_LISTs.
+
 2004-05-21  Roger Sayle  <roger@eyesopen.com>
 
        * fold-const.c (fold, fold_relational_hi_lo,

diff --git a/gcc/Makefile.in b/gcc/Makefile.in
index a178995..de890c2 100644 (file)
--- a/gcc/Makefile.in
+++ b/gcc/Makefile.in
@@ -1538,8 +1538,8 @@ tree.o : tree.c $(CONFIG_H) $(SYSTEM_H) coretypes.h $(TM_H) $(TREE_H) flags.h fu
    toplev.h $(GGC_H) $(HASHTAB_H) $(TARGET_H) output.h $(TM_P_H) langhooks.h \
    real.h gt-tree.h tree-iterator.h $(BASIC_BLOCK_H) $(TREE_FLOW_H)
 tree-dump.o: tree-dump.c $(CONFIG_H) $(SYSTEM_H) coretypes.h $(TM_H) $(TREE_H) \
-   $(C_TREE_H) flags.h langhooks.h toplev.h output.h c-pragma.h $(RTL_H) $(GGC_H) \
-   $(EXPR_H) $(SPLAY_TREE_H) $(TREE_DUMP_H)
+   $(C_TREE_H) flags.h langhooks.h toplev.h output.h c-pragma.h $(RTL_H) \
+   $(GGC_H) $(EXPR_H) $(SPLAY_TREE_H) $(TREE_DUMP_H) tree-iterator.h
 tree-inline.o : tree-inline.c $(CONFIG_H) $(SYSTEM_H) coretypes.h $(TM_H) \
    $(TREE_H) $(RTL_H) $(EXPR_H) flags.h $(PARAMS_H) input.h insn-config.h \
    $(INTEGRATE_H) $(VARRAY_H) $(HASHTAB_H) $(SPLAY_TREE_H) toplev.h \

diff --git a/gcc/tree-dump.c b/gcc/tree-dump.c
index 55ab938..45accae 100644 (file)
--- a/gcc/tree-dump.c
+++ b/gcc/tree-dump.c
@@ -29,6 +29,7 @@ Software Foundation, 59 Temple Place - Suite 330, Boston, MA
 #include "toplev.h"
 #include "tree-dump.h"
 #include "langhooks.h"
+#include "tree-iterator.h"
 
 static unsigned int queue (dump_info_p, tree, int);
 static void dump_index (dump_info_p, unsigned int);
@@ -397,6 +398,18 @@ dequeue_and_dump (dump_info_p di)
       dump_child ("chan", TREE_CHAIN (t));
       break;
 
+    case STATEMENT_LIST:
+      {
+       tree_stmt_iterator it;
+       for (i = 0, it = tsi_start (t); !tsi_end_p (it); tsi_next (&it), i++)
+         {
+           char buffer[32];
+           sprintf (buffer, "%u", i);
+           dump_child (buffer, tsi_stmt (it));
+         }
+      }
+      break;
+
     case TREE_VEC:
       dump_int (di, "lngt", TREE_VEC_LENGTH (t));
       for (i = 0; i < TREE_VEC_LENGTH (t); ++i)