convert bitfield initializer tarvals before using them
[libfirm] / ir / be / ppc32 / ppc32_transform.c
index 535cfd6..59282c0 100644 (file)
@@ -38,6 +38,7 @@
 #include "iropt_t.h"
 #include "irprintf.h"
 #include "debug.h"
+#include "error.h"
 
 #include "../benode_t.h"
 #include "bearch_ppc32_t.h"
@@ -83,11 +84,11 @@ ir_mode *get_ppc32_mode_Cond(void) {
 }
 
 /**
- * Calculates the modecode with size, sort and signed attributes
+ * Calculates the ir_modecode with size, sort and signed attributes
  */
-modecode get_nice_modecode(ir_mode *irmode)
+ir_modecode get_nice_modecode(ir_mode *irmode)
 {
-       modecode mode = irm_max;
+       ir_modecode mode = irm_max;
        int sign = mode_is_signed(irmode);
        int bits = get_mode_size_bits(irmode);
        if(mode_is_int(irmode))
@@ -186,9 +187,7 @@ int is_16bit_signed_const(ir_node *node)
                        return 0;
                }
                default:
-                       fprintf(stderr, "is_16bit_signed_const(): Mode not supported: %s\n", get_mode_name(get_irn_mode(node)));
-                       assert(0);
-                       return 0;
+                       panic("is_16bit_signed_const(): Mode not supported: %F", get_irn_mode(node));
        }
 }
 
@@ -221,9 +220,7 @@ int is_16bit_unsigned_const(ir_node *node)
                        return 1;
                }
                default:
-                       fprintf(stderr, "is_16bit_unsigned_const(): Mode not supported: %s\n", get_mode_name(get_irn_mode(node)));
-                       assert(0);
-                       return 0;
+                       panic("is_16bit_unsigned_const(): Mode not supported: %F", get_irn_mode(node));
        }
 }
 
@@ -278,9 +275,7 @@ static ir_node *gen_Add(ppc32_transform_env_t *env) {
                        return new_rd_ppc32_Add(env->dbg, env->irg, env->block, op1, op2, env->mode);
 
                default:
-                       fprintf(stderr, "Mode for Add not supported: %s\n", get_mode_name(env->mode));
-                       assert(0);
-                       return NULL;
+                       panic("Mode for Add not supported: %F", env->mode);
        }
 }
 
@@ -309,9 +304,7 @@ static ir_node *gen_Mul(ppc32_transform_env_t *env) {
 
                case irm_P:
                default:
-                       fprintf(stderr, "Mode for Mul not supported: %s\n", get_mode_name(env->mode));
-                       assert(0);
-                       return NULL;
+                       panic("Mode for Mul not supported: %F", env->mode);
        }
 }
 
@@ -340,9 +333,7 @@ static ir_node *gen_Mulh(ppc32_transform_env_t *env) {
                case irm_F:
                case irm_P:
                default:
-                       fprintf(stderr, "Mode for Mulh not supported: %s\n", get_mode_name(env->mode));
-                       assert(0);
-                       return NULL;
+                       panic("Mode for Mulh not supported: %F", env->mode);
        }
 }
 
@@ -410,9 +401,7 @@ static ir_node *gen_Sub(ppc32_transform_env_t *env) {
                        return new_rd_ppc32_Sub(env->dbg, env->irg, env->block, op1, op2, env->mode);
 
                default:
-                       fprintf(stderr, "Mode for Sub not supported: %s\n", get_mode_name(env->mode));
-                       assert(0);
-                       return NULL;
+                       panic("Mode for Sub not supported: %F", env->mode);
        }
 }
 
@@ -433,9 +422,7 @@ static ir_node *gen_Quot(ppc32_transform_env_t *env) {
                        return new_rd_ppc32_fDivs(env->dbg, env->irg, env->block, op1, op2, env->mode);
 
                default:
-                       fprintf(stderr, "Mode for Quot not supported: %s\n", get_mode_name(env->mode));
-                       assert(0);
-                       return NULL;
+                       panic("Mode for Quot not supported: %F", env->mode);
        }
 }
 
@@ -461,9 +448,7 @@ static ir_node *gen_Div(ppc32_transform_env_t *env) {
                        return new_rd_ppc32_Divwu(env->dbg, env->irg, env->block, op1, op2, mode_T);
 
                default:
-                       fprintf(stderr, "Mode for Div not supported: %s\n", get_mode_name(get_irn_mode(op1)));
-                       assert(0);
-                       return NULL;
+                       panic("Mode for Div not supported: %F", get_irn_mode(op1));
        }
 }
 
@@ -517,10 +502,7 @@ static ir_node *gen_DivMod(ppc32_transform_env_t *env) {
                        break;
 
                default:
-                       fprintf(stderr, "Mode for DivMod not supported: %s\n", get_mode_name(res_mode));
-                       assert(0);
-                       return 0;
-
+                       panic("Mode for DivMod not supported: %F", res_mode);
        }
 
        if (proj_div == NULL)
@@ -659,14 +641,14 @@ static ir_node *gen_Shrs(ppc32_transform_env_t *env) {
 }
 
 /**
- * Creates an ppc RotL.
+ * Creates an ppc Rotl.
  *
  * @param env   The transformation environment
- * @return the created ppc RotL node
+ * @return the created ppc Rotl node
  */
-static ir_node *gen_Rot(ppc32_transform_env_t *env) {
-       ir_node *op1 = get_Rot_left(env->irn);
-       ir_node *op2 = get_Rot_right(env->irn);
+static ir_node *gen_Rotl(ppc32_transform_env_t *env) {
+       ir_node *op1 = get_Rotl_left(env->irn);
+       ir_node *op2 = get_Rotl_right(env->irn);
 
        if(is_ppc32_Const(op2))
        {
@@ -755,9 +737,7 @@ static ir_node *gen_Minus(ppc32_transform_env_t *env) {
                        return new_rd_ppc32_Neg(env->dbg, env->irg, env->block, op, env->mode);
 
                default:
-                       fprintf(stderr, "Mode for Neg not supported: %s\n", get_mode_name(env->mode));
-                       assert(0);
-                       return NULL;
+                       panic("Mode for Neg not supported: %F", env->mode);
        }
 }
 
@@ -791,8 +771,8 @@ static ir_node *own_gen_Andi_dot_lo16(ppc32_transform_env_t *env, ir_node *op, i
  */
 static ir_node *gen_Conv(ppc32_transform_env_t *env) {
        ir_node *op = get_Conv_op(env->irn);
-       modecode from_mode=get_nice_modecode(get_irn_mode(op));
-       modecode to_mode=get_nice_modecode(env->mode);
+       ir_modecode from_mode=get_nice_modecode(get_irn_mode(op));
+       ir_modecode to_mode=get_nice_modecode(env->mode);
 
 #define SKIP return op
 
@@ -884,11 +864,7 @@ static ir_node *gen_Conv(ppc32_transform_env_t *env) {
                        break;
        }
 
-       fprintf(stderr, "Mode for Conv not supported: %s -> %s\n",
-               get_mode_name(get_irn_mode(get_irn_n(env->irn,0))),get_mode_name(env->mode));
-       assert(0);
-       return NULL;
-
+       panic("Mode for Conv not supported: %F -> %F", get_irn_mode(op), env->mode);
 #undef SKIP
 }
 
@@ -921,8 +897,7 @@ static ir_node *gen_Abs(ppc32_transform_env_t *env) {
                default:
                        break;
        }
-       fprintf(stderr, "Mode for Abs not supported: %s\n", get_mode_name(env->mode));
-       assert(0);
+       panic("Mode for Abs not supported: %F", env->mode);
        return NULL;
 }
 
@@ -967,11 +942,7 @@ static ir_node *gen_Unknown(ppc32_transform_env_t *env) {
        else if (mode_is_int(env->mode))
                return new_rd_ppc32_Unknown(env->dbg, env->irg, env->block, env->mode);
        else
-       {
-               fprintf(stderr, "Mode %s for unknown value not supported.\n", get_mode_name(env->mode));
-               assert(0);
-               return 0;
-       }
+               panic("Mode %F for unknown value not supported.", env->mode);
 }
 
 static ir_node *ldst_insert_const(ir_node *ptr, tarval **ptv, ident **pid, ppc32_transform_env_t *env) {
@@ -1048,9 +1019,7 @@ static ir_node *gen_Load(ppc32_transform_env_t *env) {
                        break;
 
                default:
-                       fprintf(stderr, "Mode for Load not supported: %s\n", get_mode_name(env->mode));
-                       assert(0);
-                       return 0;
+                       panic("Mode for Load not supported: %F", env->mode);
        }
 
        if(tv_const)
@@ -1109,9 +1078,7 @@ static ir_node *gen_Store(ppc32_transform_env_t *env) {
                        break;
 
                default:
-                       fprintf(stderr, "Mode for Store not supported: %s\n", get_mode_name(env->mode));
-                       assert(0);
-                       return 0;
+                       panic("Mode for Store not supported: %F", env->mode);
        }
        if(tv_const)
        {
@@ -1274,9 +1241,7 @@ static ir_node *gen_be_FrameAddr(ppc32_transform_env_t *env) {
  * the BAD transformer.
  */
 static ir_node *bad_transform(ppc32_transform_env_t *env) {
-       ir_fprintf(stderr, "Not implemented: %+F\n", env->irn);
-       assert(0);
-       return NULL;
+       panic("Transformation not implemented: %+F\n", env->irn);
 }
 
 /**
@@ -1302,7 +1267,7 @@ void ppc32_register_transformers(void) {
        FIRM_OP(Shl);
        FIRM_OP(Shr);
        FIRM_OP(Shrs);
-       FIRM_OP(Rot);
+       FIRM_OP(Rotl);
        FIRM_OP(Quot);
        FIRM_OP(Div);
        FIRM_OP(DivMod);
@@ -1346,7 +1311,7 @@ void ppc32_register_transformers(void) {
        BAD(Free);
        BAD(Tuple);
        BAD(Id);
-       BAD(Bad);
+       //BAD(Bad);
        BAD(Confirm);
        BAD(Filter);
        BAD(CallBegin);
@@ -1548,9 +1513,7 @@ static ir_node *gen_ppc32_Const(ppc32_transform_env_t *env) {
                }
 
                default:
-                       fprintf(stderr, "Mode for Const not supported: %s\n", get_mode_name(env->mode));
-                       assert(0);
-                       return 0;
+                       panic("Mode for Const not supported: %F", env->mode);
        }
        set_ppc32_constant_tarval(node, tv_const);
        return node;
@@ -1603,11 +1566,8 @@ static ir_node *gen_ppc32_fConst(ppc32_transform_env_t *env) {
                }
 
                default:
-                       fprintf(stderr, "Mode for fConst not supported: %s\n", get_mode_name(env->mode));
-                       assert(0);
-                       return 0;
+                       panic("Mode for fConst not supported: %F", env->mode);
        }
-       assert(0 && "Dead end!");
 }
 
 
@@ -1663,9 +1623,7 @@ static ir_node *gen_ppc32_SymConst(ppc32_transform_env_t *env) {
                }
 
                default:
-                       fprintf(stderr, "Mode for SymConst not supported: %s\n", get_mode_name(env->mode));
-                       assert(0);
-                       return 0;
+                       panic("Mode for SymConst not supported: %F", env->mode);
        }
        return node;
 }