add compound parameter lower to lower_for_target

[libfirm] / ir / be / ia32 / ia32_intrinsics.c

diff --git a/ir/be/ia32/ia32_intrinsics.c b/ir/be/ia32/ia32_intrinsics.c
index bdd7491..2a522d7 100644 (file)
--- a/ir/be/ia32/ia32_intrinsics.c
+++ b/ir/be/ia32/ia32_intrinsics.c
@@ -112,7 +112,7 @@ static void resolve_call(ir_node *call, ir_node *l_res, ir_node *h_res, ir_graph
 
                foreach_out_edge_safe(call, edge, next) {
                        ir_node *proj = get_edge_src_irn(edge);
-                       pn_Call pn    = get_Proj_proj(proj);
+                       pn_Call pn    = (pn_Call)get_Proj_proj(proj);
 
                        switch (pn) {
                        case pn_Call_X_regular:
@@ -269,7 +269,8 @@ static int map_Shl(ir_node *call, void *ctx)
                /* the shift count is a const, create better code */
                ir_tarval *tv = get_Const_tarval(cnt);
 
-               if (tarval_cmp(tv, new_tarval_from_long(32, l_mode)) & (pn_Cmp_Gt|pn_Cmp_Eq)) {
+               if (tarval_cmp(tv, new_tarval_from_long(32, l_mode))
+                               & (ir_relation_greater_equal)) {
                        /* simplest case: shift only the lower bits. Note that there is no
                           need to reduce the constant here, this is done by the hardware.  */
                        ir_node *conv = new_rd_Conv(dbg, block, a_l, h_mode);
@@ -300,8 +301,7 @@ static int map_Shl(ir_node *call, void *ctx)
        c_mode = get_irn_mode(cnt);
        irn    = new_r_Const_long(irg, c_mode, 32);
        irn    = new_rd_And(dbg, upper, cnt, irn, c_mode);
-       irn    = new_rd_Cmp(dbg, upper, irn, new_r_Const(irg, get_mode_null(c_mode)));
-       irn    = new_r_Proj(irn, mode_b, pn_Cmp_Eq);
+       irn    = new_rd_Cmp(dbg, upper, irn, new_r_Const(irg, get_mode_null(c_mode)), ir_relation_equal);
        cond   = new_rd_Cond(dbg, upper, irn);
 
        in[0]  = new_r_Proj(cond, mode_X, pn_Cond_true);
@@ -328,8 +328,10 @@ static int map_Shl(ir_node *call, void *ctx)
 
        /* move it down */
        set_nodes_block(call, block);
-       for (irn = get_irn_link(call); irn != NULL; irn = get_irn_link(irn))
+       for (irn = (ir_node*)get_irn_link(call); irn != NULL;
+            irn = (ir_node*)get_irn_link(irn)) {
                set_nodes_block(irn, block);
+       }
 
        resolve_call(call, l_res, h_res, irg, block);
        return 1;
@@ -358,7 +360,7 @@ static int map_Shr(ir_node *call, void *ctx)
                /* the shift count is a const, create better code */
                ir_tarval *tv = get_Const_tarval(cnt);
 
-               if (tarval_cmp(tv, new_tarval_from_long(32, l_mode)) & (pn_Cmp_Gt|pn_Cmp_Eq)) {
+               if (tarval_cmp(tv, new_tarval_from_long(32, l_mode)) & (ir_relation_greater_equal)) {
                        /* simplest case: shift only the higher bits. Note that there is no
                           need to reduce the constant here, this is done by the hardware.  */
                        ir_node *conv = new_rd_Conv(dbg, block, a_h, l_mode);
@@ -387,8 +389,7 @@ static int map_Shr(ir_node *call, void *ctx)
        c_mode = get_irn_mode(cnt);
        irn    = new_r_Const_long(irg, c_mode, 32);
        irn    = new_rd_And(dbg, upper, cnt, irn, c_mode);
-       irn    = new_rd_Cmp(dbg, upper, irn, new_r_Const(irg, get_mode_null(c_mode)));
-       irn    = new_r_Proj(irn, mode_b, pn_Cmp_Eq);
+       irn    = new_rd_Cmp(dbg, upper, irn, new_r_Const(irg, get_mode_null(c_mode)), ir_relation_equal);
        cond   = new_rd_Cond(dbg, upper, irn);
 
        in[0]  = new_r_Proj(cond, mode_X, pn_Cond_true);
@@ -415,8 +416,10 @@ static int map_Shr(ir_node *call, void *ctx)
 
        /* move it down */
        set_nodes_block(call, block);
-       for (irn = get_irn_link(call); irn != NULL; irn = get_irn_link(irn))
+       for (irn = (ir_node*)get_irn_link(call); irn != NULL;
+            irn = (ir_node*)get_irn_link(irn)) {
                set_nodes_block(irn, block);
+       }
 
        resolve_call(call, l_res, h_res, irg, block);
        return 1;
@@ -445,7 +448,7 @@ static int map_Shrs(ir_node *call, void *ctx)
                /* the shift count is a const, create better code */
                ir_tarval *tv = get_Const_tarval(cnt);
 
-               if (tarval_cmp(tv, new_tarval_from_long(32, l_mode)) & (pn_Cmp_Gt|pn_Cmp_Eq)) {
+               if (tarval_cmp(tv, new_tarval_from_long(32, l_mode)) & (ir_relation_greater_equal)) {
                        /* simplest case: shift only the higher bits. Note that there is no
                           need to reduce the constant here, this is done by the hardware.  */
                        ir_node *conv    = new_rd_Conv(dbg, block, a_h, l_mode);
@@ -476,8 +479,7 @@ static int map_Shrs(ir_node *call, void *ctx)
        c_mode = get_irn_mode(cnt);
        irn    = new_r_Const_long(irg, c_mode, 32);
        irn    = new_rd_And(dbg, upper, cnt, irn, c_mode);
-       irn    = new_rd_Cmp(dbg, upper, irn, new_r_Const(irg, get_mode_null(c_mode)));
-       irn    = new_r_Proj(irn, mode_b, pn_Cmp_Eq);
+       irn    = new_rd_Cmp(dbg, upper, irn, new_r_Const(irg, get_mode_null(c_mode)), ir_relation_equal);
        cond   = new_rd_Cond(dbg, upper, irn);
 
        in[0]  = new_r_Proj(cond, mode_X, pn_Cond_true);
@@ -504,8 +506,10 @@ static int map_Shrs(ir_node *call, void *ctx)
 
        /* move it down */
        set_nodes_block(call, block);
-       for (irn = get_irn_link(call); irn != NULL; irn = get_irn_link(irn))
+       for (irn = (ir_node*)get_irn_link(call); irn != NULL;
+            irn = (ir_node*)get_irn_link(irn)) {
                set_nodes_block(irn, block);
+       }
 
        resolve_call(call, l_res, h_res, irg, block);
        return 1;
@@ -703,7 +707,7 @@ static ir_entity *create_compiler_lib_entity(const char *name, ir_type *type)
  */
 static int map_Div(ir_node *call, void *ctx)
 {
-       ia32_intrinsic_env_t *env = ctx;
+       ia32_intrinsic_env_t *env = (ia32_intrinsic_env_t*)ctx;
        ir_type   *method    = get_Call_type(call);
        ir_mode   *h_mode    = get_type_mode(get_method_res_type(method, 1));
        ir_node   *ptr;
@@ -739,7 +743,7 @@ static int map_Div(ir_node *call, void *ctx)
  */
 static int map_Mod(ir_node *call, void *ctx)
 {
-       ia32_intrinsic_env_t *env = ctx;
+       ia32_intrinsic_env_t *env = (ia32_intrinsic_env_t*)ctx;
        ir_type   *method    = get_Call_type(call);
        ir_mode   *h_mode    = get_type_mode(get_method_res_type(method, 1));
        ir_node   *ptr;
@@ -816,9 +820,8 @@ static int map_Conv(ir_node *call, void *ctx)
                        part_block(call);
                        upper_blk = get_nodes_block(call);
 
-                       cmp   = new_rd_Cmp(dbg, upper_blk, a_f, flt_corr);
-                       proj  = new_r_Proj(cmp, mode_b, pn_Cmp_Lt);
-                       cond  = new_rd_Cond(dbg, upper_blk, proj);
+                       cmp   = new_rd_Cmp(dbg, upper_blk, a_f, flt_corr, ir_relation_less);
+                       cond  = new_rd_Cond(dbg, upper_blk, cmp);
                        in[0] = new_r_Proj(cond, mode_X, pn_Cond_true);
                        in[1] = new_r_Proj(cond, mode_X, pn_Cond_false);
                        blk   = new_r_Block(irg, 1, &in[1]);
@@ -854,8 +857,10 @@ static int map_Conv(ir_node *call, void *ctx)
                        /* move the call and its Proj's to the lower block */
                        set_nodes_block(call, lower_blk);
 
-                       for (proj = get_irn_link(call); proj != NULL; proj = get_irn_link(proj))
+                       for (proj = (ir_node*)get_irn_link(call); proj != NULL;
+                            proj = (ir_node*)get_irn_link(proj)) {
                                set_nodes_block(proj, lower_blk);
+                       }
                        block = lower_blk;
                }
                /* lower the call */