X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=ir%2Fana%2Fanalyze_irg_args.c;h=830898d02f82bdd5d97cf596e0e0f9916df7eca1;hb=3da5ed2598245b896255bc444aaa1768f6098cfe;hp=a40cc6ab2c5366c21888adaa3a229c09e04221a8;hpb=ee44e33167b44432066f2ca6c7e413daa1949280;p=libfirm

diff --git a/ir/ana/analyze_irg_args.c b/ir/ana/analyze_irg_args.c
index a40cc6ab2..830898d02 100644
--- a/ir/ana/analyze_irg_args.c
+++ b/ir/ana/analyze_irg_args.c
@@ -20,21 +20,19 @@
 /**
  * @file
  * @brief      read/write analyze of graph argument, which have mode reference.
- * @author     Beyhan Veliev, Michael Beck
+ * @author     Beyhan Veliev
  * @version    $Id$
  */
 #include "config.h"
 
 #include <stdlib.h>
 
-#include "adt/raw_bitset.h"
 #include "irouts.h"
 #include "irnode_t.h"
 #include "irmode_t.h"
 #include "array_t.h"
 #include "irprog.h"
 #include "entity_t.h"
-#include "irgwalk.h"
 
 #include "analyze_irg_args.h"
 
@@ -49,7 +47,8 @@ static void *VISITED = &v;
  * @param arg   The graph argument with mode reference,
  *             that must be checked.
  */
-static unsigned analyze_arg(ir_node *arg, unsigned bits) {
+static unsigned analyze_arg(ir_node *arg, unsigned bits)
+{
 	int i, p;
 	ir_node *succ;
 
@@ -178,7 +177,8 @@ static unsigned analyze_arg(ir_node *arg, unsigned bits) {
  *
  * @param irg   The ir graph to analyze.
  */
-static void analyze_ent_args(ir_entity *ent) {
+static void analyze_ent_args(ir_entity *ent)
+{
 	ir_graph *irg;
 	ir_node *irg_args, *arg;
 	ir_mode *arg_mode;
@@ -262,7 +262,8 @@ static void analyze_ent_args(ir_entity *ent) {
  *
  * @param irg   The ir graph to analyze.
  */
-void analyze_irg_args(ir_graph *irg) {
+void analyze_irg_args(ir_graph *irg)
+{
 	ir_entity *ent;
 
 	if (irg == get_const_code_irg())
@@ -319,7 +320,8 @@ enum args_weight {
  *
  * @param arg  The parameter them weight muss be computed.
  */
-static unsigned calc_method_param_weight(ir_node *arg) {
+static unsigned calc_method_param_weight(ir_node *arg)
+{
 	int      i, j, k;
 	ir_node  *succ, *op;
 	unsigned weight = null_weight;
@@ -422,7 +424,8 @@ static unsigned calc_method_param_weight(ir_node *arg) {
  *
  * @param ent  The entity of the ir_graph.
  */
-static void analyze_method_params_weight(ir_entity *ent) {
+static void analyze_method_params_weight(ir_entity *ent)
+{
 	ir_type  *mtp;
 	ir_graph *irg;
 	int      nparams, i, proj_nr;
@@ -495,117 +498,14 @@ unsigned get_method_param_weight(ir_entity *ent, int pos)
 		return null_weight;
 }
 
-typedef struct walk_env {
-	unsigned *marks;      /**< raw bitset for nodes that could be analysed */
-	unsigned *param_mask; /**< raw bitset of constant parameters */
-	unsigned mask_len;    /**< length of the parameter bitmask */
-	unsigned weight;      /**< the accumulated weight */
-} walk_env;
-
-/**
- * Walker, evaluates possible constant folding
- */
-static void evaluate_weight(ir_node *irn, void *ctx) {
-	walk_env *env = ctx;
-	int      i, n;
-	ir_node  *ptr;
-
-	if (is_arg_Proj(irn)) {
-		unsigned argnum = (unsigned)get_Proj_proj(irn);
-
-		if (argnum < env->mask_len) {
-			if (rbitset_is_set(env->param_mask, argnum)) {
-				/* is a constant parameter */
-				rbitset_set(env->marks, get_irn_idx(irn));
-			}
-		}
-		return;
-	}
-	if (is_irn_constlike(irn)) {
-		/* is a constant by itself */
-		rbitset_set(env->marks, get_irn_idx(irn));
-		return;
-	}
-
-	if (is_Block(irn))
-		return;
-
-	/* handle some special cases */
-	switch (get_irn_opcode(irn)) {
-	case iro_Div:
-	case iro_Quot:
-	case iro_Mod:
-	case iro_DivMod:
-		/* skip the memory input of these nodes */
-		assert(pn_Generic_M_regular == 0);
-		n = 1;
-		break;
-	case iro_Call:
-		ptr = get_Call_ptr(irn);
-		if (! is_SymConst(ptr) && rbitset_is_set(env->marks, get_irn_idx(ptr))) {
-			/* the arguments is used as an pointer input for a call,
-			we can probably change an indirect Call into a direct one. */
-			env->weight += indirect_call_weight;
-		}
-		n = 2;
-		break;
-	default:
-		n = 0;
-		break;
-	}
-	for (i = get_irn_arity(irn) - 1; i >= n; --i) {
-		ir_node *pred = get_irn_n(irn, i);
-
-		if (! rbitset_is_set(env->marks, get_irn_idx(pred))) {
-			/* not constant predecessor ... */
-			return;
-		}
-	}
-
-	/* all predecessors are constant, we probably can fold this node */
-	rbitset_set(env->marks, get_irn_idx(irn));
-
-	if (is_binop(irn)) {
-		env->weight += const_binop_weight;
-	} else if (is_unop(irn)) {
-		env->weight += const_binop_weight;
-	} else if (is_Proj(irn)) {
-		ir_node *pred = get_Proj_pred(irn);
-		if (is_Cmp(pred)) {
-			env->weight += const_cmp_weight;
-		} else if (is_Cond(pred)) {
-			/* the argument is used for a SwitchCond, a big win */
-			env->weight += const_cmp_weight;
-		}
-	}
-}
-
-/**
- *
- */
-unsigned analyze_irg_param_weights(ir_graph *irg, unsigned *bitmask, unsigned len) {
-	unsigned nodes = get_irg_last_idx(irg);
-	unsigned *marks = rbitset_malloc(nodes);
-	walk_env env;
-
-	env.marks      = marks;
-	env.param_mask = bitmask;
-	env.mask_len   = len;
-	env.weight     = null_weight;
-
-	irg_walk_graph(irg, NULL, evaluate_weight, &env);
-
-	xfree(marks);
-	return env.weight;
-}
-
 /**
  * Analyze argument's weight of a given
  * ir graph.
  *
  * @param irg The ir graph to analyze.
  */
-void analyze_irg_args_weight(ir_graph *irg) {
+void analyze_irg_args_weight(ir_graph *irg)
+{
 	ir_entity *ent;
 
 	ent = get_irg_entity(irg);