X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=ir%2Fir%2Firarch.c;h=d72fbe951f57e6173fb3f8e01adb1785c5d49ed0;hb=94bae803683a67bd6fdf43d7e30040a8f8c730b3;hp=43b78e4ecbca416da30a40a02fc6ae9f6329acf0;hpb=1d388750d39676d3bb5a8056341868b5a6ca604c;p=libfirm diff --git a/ir/ir/irarch.c b/ir/ir/irarch.c index 43b78e4ec..d72fbe951 100644 --- a/ir/ir/irarch.c +++ b/ir/ir/irarch.c @@ -29,10 +29,7 @@ */ #include "config.h" -#ifdef HAVE_STDLIB_H -# include -#endif - +#include #include #include "irnode_t.h" @@ -448,12 +445,12 @@ static ir_node *build_graph(mul_env *env, instruction *inst) { case LEA: l = build_graph(env, inst->in[0]); r = build_graph(env, inst->in[1]); - c = new_Const(env->shf_mode, new_tarval_from_long(inst->shift_count, env->shf_mode)); + c = new_Const_long(env->shf_mode, inst->shift_count); r = new_rd_Shl(env->dbg, current_ir_graph, env->blk, r, c, env->mode); return inst->irn = new_rd_Add(env->dbg, current_ir_graph, env->blk, l, r, env->mode); case SHIFT: l = build_graph(env, inst->in[0]); - c = new_Const(env->shf_mode, new_tarval_from_long(inst->shift_count, env->shf_mode)); + c = new_Const_long(env->shf_mode, inst->shift_count); return inst->irn = new_rd_Shl(env->dbg, current_ir_graph, env->blk, l, c, env->mode); case SUB: l = build_graph(env, inst->in[0]); @@ -464,7 +461,7 @@ static ir_node *build_graph(mul_env *env, instruction *inst) { r = build_graph(env, inst->in[1]); return inst->irn = new_rd_Add(env->dbg, current_ir_graph, env->blk, l, r, env->mode); case ZERO: - return inst->irn = new_Const(env->mode, get_mode_null(env->mode)); + return inst->irn = new_Const(get_mode_null(env->mode)); default: panic("Unsupported instruction kind"); return NULL; @@ -506,6 +503,9 @@ static int evaluate_insn(mul_env *env, instruction *inst) { case ZERO: inst->costs = costs = env->evaluate(inst->kind, NULL); return costs; + case MUL: + case ROOT: + break; } panic("Unsupported instruction kind"); } @@ -822,7 +822,7 @@ static ir_node *replace_div_by_mulh(ir_node *div, tarval *tv) { struct ms mag = magic(tv); /* generate the Mulh instruction */ - c = new_Const(mode, mag.M); + c = new_Const(mag.M); q = new_rd_Mulh(dbg, current_ir_graph, block, n, c, mode); /* do we need an Add or Sub */ @@ -847,7 +847,7 @@ static ir_node *replace_div_by_mulh(ir_node *div, tarval *tv) { ir_node *c; /* generate the Mulh instruction */ - c = new_Const(mode, mag.M); + c = new_Const(mag.M); q = new_rd_Mulh(dbg, current_ir_graph, block, n, c, mode); if (mag.need_add) { @@ -855,7 +855,7 @@ static ir_node *replace_div_by_mulh(ir_node *div, tarval *tv) { /* use the GM scheme */ t = new_rd_Sub(dbg, current_ir_graph, block, n, q, mode); - c = new_Const(mode_Iu, get_mode_one(mode_Iu)); + c = new_Const(get_mode_one(mode_Iu)); t = new_rd_Shr(dbg, current_ir_graph, block, t, c, mode); t = new_rd_Add(dbg, current_ir_graph, block, t, q, mode); @@ -928,7 +928,7 @@ ir_node *arch_dep_replace_div_by_const(ir_node *irn) { ir_node *curr = left; /* create the correction code for signed values only if there might be a remainder */ - if (! is_Div_remainderless(irn)) { + if (! get_Div_no_remainder(irn)) { if (k != 1) { k_node = new_Const_long(mode_Iu, k - 1); curr = new_rd_Shrs(dbg, current_ir_graph, block, left, k_node, mode); @@ -948,7 +948,7 @@ ir_node *arch_dep_replace_div_by_const(ir_node *irn) { if (n_flag) { /* negate the result */ ir_node *k_node; - k_node = new_Const(mode, get_mode_null(mode)); + k_node = new_Const(get_mode_null(mode)); res = new_rd_Sub(dbg, current_ir_graph, block, k_node, res, mode); } } else { /* unsigned case */ @@ -1134,7 +1134,7 @@ void arch_dep_replace_divmod_by_const(ir_node **div, ir_node **mod, ir_node *irn if (n_flag) { /* negate the div result */ ir_node *k_node; - k_node = new_Const(mode, get_mode_null(mode)); + k_node = new_Const(get_mode_null(mode)); *div = new_rd_Sub(dbg, current_ir_graph, block, k_node, *div, mode); }