Standalone loop tree dumper was broken!

fixed it.

[r2843]

diff --git a/ir/ir/irdump.c b/ir/ir/irdump.c
index ffd76fe..d0855bf 100644 (file)
--- a/ir/ir/irdump.c
+++ b/ir/ir/irdump.c
@@ -1983,13 +1983,12 @@ void dump_loops_standalone (ir_loop *loop) {
 
   /* Dump the loop elements. */
 
-  if (get_kind(son) == k_ir_loop)
+  for(i = 0; i < get_loop_n_elements(loop); i++)
     {
-      /* We are a loop son -> Recurse */
       le = get_loop_element(loop, i);
-
       son = le.son;
       if (get_kind(son) == k_ir_loop) {
+
         /* We are a loop son -> Recurse */
 
         if(loop_node_started) { /* Close the "firm-nodes" node first if we started one. */
@@ -2046,6 +2045,7 @@ void dump_loop_tree(ir_graph *irg, char *suffix)
   int el_rem = edge_label;
   edge_label = 1;
 
+  /* @@@ AS: What does that do? */
   if(strncmp(get_irg_dump_name(irg),dump_file_filter,strlen(dump_file_filter))!=0) return;
 
   current_ir_graph = irg;

diff --git a/ir/ir/irflag.h b/ir/ir/irflag.h
index 09610c2..109ff3b 100644 (file)
--- a/ir/ir/irflag.h
+++ b/ir/ir/irflag.h
@@ -107,6 +107,14 @@ void set_opt_reassociation(int value);
  * Default: opt_dead_node_elimination == 1. */
 void set_opt_dead_node_elimination (int value);
 
+/** Enables/Disables dead method elimination.
+ *
+ * If opt_dead_node_elimination == 1 methods never called are
+ * removed.
+ * Default: opt_dead_node_elimination == 1. */
+void set_opt_dead_method_elimination (int value);
+void set_opt_dead_method_elimination_verbose (int value);
+
 /** Enable/Disables inlining.
  *
  * If opt_inline == 1 the inlining transformation is performed.