irop_flag_highlevel flag added to Confirm and Cast

[libfirm] / ir / stat / firmstat.c

diff --git a/ir/stat/firmstat.c b/ir/stat/firmstat.c
index 1bb6ed3..3231f94 100644 (file)
--- a/ir/stat/firmstat.c
+++ b/ir/stat/firmstat.c
@@ -62,6 +62,12 @@ static ir_op _op_DivModC;
 /** The memory Proj node. */
 static ir_op _op_ProjM;
 
+/** A Sel of a Sel */
+static ir_op _op_SelSel;
+
+/** A Sel of a Sel of a Sel */
+static ir_op _op_SelSelSel;
+
 /* ---------------------------------------------------------------------------------- */
 
 /** Marks the begin of a statistic (hook) function. */
@@ -369,6 +375,15 @@ static ir_op *stat_get_irn_op(ir_node *node)
     /* special case, a division/modulo by a const, count on extra counter */
     op = status->op_DivModC ? status->op_DivModC : op;
   }
+  else if (op == op_Sel && get_irn_op(get_Sel_ptr(node)) == op_Sel) {
+    /* special case, a Sel of a Sel, count on extra counter */
+    op = status->op_SelSel ? status->op_SelSel : op;
+
+    if (get_irn_op(get_Sel_ptr(get_Sel_ptr(node))) == op_Sel) {
+      /* special case, a Sel of a Sel of a Sel, count on extra counter */
+      op = status->op_SelSelSel ? status->op_SelSelSel : op;
+    }
+  }
 
   return op;
 }
@@ -1216,7 +1231,7 @@ static void stat_inline(void *ctx, ir_node *call, ir_graph *called_irg)
  *
  * @param ctx  the hook context
  */
-static void stat_tail_rec(void *ctx, ir_graph *irg)
+static void stat_tail_rec(void *ctx, ir_graph *irg, int n_calls)
 {
   if (! status->stat_options)
     return;
@@ -1225,7 +1240,7 @@ static void stat_tail_rec(void *ctx, ir_graph *irg)
   {
     graph_entry_t *graph = graph_get_entry(irg, status->irg_hash);
 
-    graph->num_tail_recursion++;
+    graph->num_tail_recursion += n_calls;
   }
   STAT_LEAVE;
 }
@@ -1552,6 +1567,21 @@ void init_stat(unsigned enable_options)
     status->op_DivModC = NULL;
   }
 
+  if (enable_options & FIRMSTAT_COUNT_SELS) {
+    _op_SelSel.code    = get_next_ir_opcode();
+    _op_SelSel.name    = new_id_from_chars(X("Sel(Sel)"));
+
+    _op_SelSelSel.code = get_next_ir_opcode();
+    _op_SelSelSel.name = new_id_from_chars(X("Sel(Sel(Sel))"));
+
+    status->op_SelSel    = &_op_SelSel;
+    status->op_SelSelSel = &_op_SelSelSel;
+  }
+  else {
+    status->op_SelSel    = NULL;
+    status->op_SelSelSel = NULL;
+  }
+
   /* register the dumper */
   stat_register_dumper(&simple_dumper);