more tests added
[libfirm] / ir / be / benode.c
index 4dab094..30be692 100644 (file)
@@ -127,10 +127,7 @@ ir_op *op_be_AddSP;
 ir_op *op_be_SubSP;
 ir_op *op_be_SetSP;
 ir_op *op_be_RegParams;
-ir_op *op_be_StackParam;
 ir_op *op_be_FrameAddr;
-ir_op *op_be_FrameLoad;
-ir_op *op_be_FrameStore;
 ir_op *op_be_Barrier;
 
 static int beo_base = -1;
@@ -277,9 +274,6 @@ void be_node_init(void) {
        op_be_IncSP      = new_ir_op(beo_base + beo_IncSP,      "be_IncSP",      op_pin_state_pinned,     N, oparity_unary,    0, sizeof(be_stack_attr_t),   &be_node_op_ops);
        op_be_SetSP      = new_ir_op(beo_base + beo_SetSP,      "be_SetSP",      op_pin_state_pinned,     N, oparity_binary,   0, sizeof(be_stack_attr_t),   &be_node_op_ops);
        op_be_RegParams  = new_ir_op(beo_base + beo_RegParams,  "be_RegParams",  op_pin_state_pinned,     N, oparity_zero,     0, sizeof(be_node_attr_t),    &be_node_op_ops);
-       op_be_StackParam = new_ir_op(beo_base + beo_StackParam, "be_StackParam", op_pin_state_floats,     N, oparity_unary,    0, sizeof(be_frame_attr_t),   &be_node_op_ops);
-       op_be_FrameLoad  = new_ir_op(beo_base + beo_FrameLoad,  "be_FrameLoad",  op_pin_state_floats,     N, oparity_any,      0, sizeof(be_frame_attr_t),   &be_node_op_ops);
-       op_be_FrameStore = new_ir_op(beo_base + beo_FrameStore, "be_FrameStore", op_pin_state_floats,     N, oparity_any,      0, sizeof(be_frame_attr_t),   &be_node_op_ops);
        op_be_FrameAddr  = new_ir_op(beo_base + beo_FrameAddr,  "be_FrameAddr",  op_pin_state_floats,     N, oparity_unary,    0, sizeof(be_frame_attr_t),   &be_node_op_ops);
        op_be_Barrier    = new_ir_op(beo_base + beo_Barrier,    "be_Barrier",    op_pin_state_pinned,     N, oparity_dynamic,  0, sizeof(be_node_attr_t),    &be_node_op_ops);
 
@@ -311,12 +305,6 @@ void be_node_init(void) {
        op_be_IncSP->ops.node_cmp_attr = Stack_cmp_attr;
        set_op_tag(op_be_RegParams,  &be_node_tag);
        op_be_RegParams->ops.node_cmp_attr = node_cmp_attr;
-       set_op_tag(op_be_StackParam, &be_node_tag);
-       op_be_StackParam->ops.node_cmp_attr = FrameAddr_cmp_attr;
-       set_op_tag(op_be_FrameLoad,  &be_node_tag);
-       op_be_FrameLoad->ops.node_cmp_attr = FrameAddr_cmp_attr;
-       set_op_tag(op_be_FrameStore, &be_node_tag);
-       op_be_FrameStore->ops.node_cmp_attr = FrameAddr_cmp_attr;
        set_op_tag(op_be_FrameAddr,  &be_node_tag);
        op_be_FrameAddr->ops.node_cmp_attr = FrameAddr_cmp_attr;
        set_op_tag(op_be_Barrier,    &be_node_tag);
@@ -790,24 +778,6 @@ ir_node *be_new_SetSP(const arch_register_t *sp, ir_graph *irg, ir_node *bl,
        return irn;
 }
 
-ir_node *be_new_StackParam(const arch_register_class_t *cls, const arch_register_class_t *cls_frame, ir_graph *irg, ir_node *bl, ir_mode *mode, ir_node *frame_pointer, ir_entity *ent)
-{
-       be_frame_attr_t *a;
-       ir_node *irn;
-       ir_node *in[1];
-
-       in[0] = frame_pointer;
-       irn = new_ir_node(NULL, irg, bl, op_be_StackParam, mode, 1, in);
-       a = init_node_attr(irn, 1);
-       a->ent = ent;
-
-       be_node_set_reg_class(irn, 0, cls_frame);
-       be_node_set_reg_class(irn, OUT_POS(0), cls);
-       be_node_set_flags(irn, OUT_POS(0), arch_irn_flags_rematerializable);
-
-       return irn;
-}
-
 ir_node *be_new_RegParams(ir_graph *irg, ir_node *bl, int n_outs)
 {
        ir_node *res;
@@ -844,43 +814,6 @@ ir_node *be_RegParams_append_out_reg(ir_node *regparams,
        return proj;
 }
 
-ir_node *be_new_FrameLoad(const arch_register_class_t *cls_frame, const arch_register_class_t *cls_data,
-                                                 ir_graph *irg, ir_node *bl, ir_node *mem, ir_node *frame, ir_entity *ent)
-{
-       be_frame_attr_t *a;
-       ir_node *irn;
-       ir_node *in[2];
-
-       in[0]  = mem;
-       in[1]  = frame;
-       irn    = new_ir_node(NULL, irg, bl, op_be_FrameLoad, mode_T, 2, in);
-       a      = init_node_attr(irn, 3);
-       a->ent = ent;
-       a->offset = 0;
-       be_node_set_reg_class(irn, 1, cls_frame);
-       be_node_set_reg_class(irn, OUT_POS(pn_Load_res), cls_data);
-       return irn;
-}
-
-ir_node *be_new_FrameStore(const arch_register_class_t *cls_frame, const arch_register_class_t *cls_data,
-                                                  ir_graph *irg, ir_node *bl, ir_node *mem, ir_node *frame, ir_node *data, ir_entity *ent)
-{
-       be_frame_attr_t *a;
-       ir_node *irn;
-       ir_node *in[3];
-
-       in[0]  = mem;
-       in[1]  = frame;
-       in[2]  = data;
-       irn    = new_ir_node(NULL, irg, bl, op_be_FrameStore, mode_T, 3, in);
-       a      = init_node_attr(irn, 3);
-       a->ent = ent;
-       a->offset = 0;
-       be_node_set_reg_class(irn, 1, cls_frame);
-       be_node_set_reg_class(irn, 2, cls_data);
-       return irn;
-}
-
 ir_node *be_new_FrameAddr(const arch_register_class_t *cls_frame, ir_graph *irg, ir_node *bl, ir_node *frame, ir_entity *ent)
 {
        be_frame_attr_t *a;
@@ -898,11 +831,17 @@ ir_node *be_new_FrameAddr(const arch_register_class_t *cls_frame, ir_graph *irg,
        return optimize_node(irn);
 }
 
-ir_node *be_get_FrameAddr_frame(ir_node *node) {
+ir_node *be_get_FrameAddr_frame(const ir_node *node) {
        assert(be_is_FrameAddr(node));
        return get_irn_n(node, be_pos_FrameAddr_ptr);
 }
 
+ir_entity *be_get_FrameAddr_entity(const ir_node *node)
+{
+       const be_frame_attr_t *attr = get_irn_generic_attr_const(node);
+       return attr->ent;
+}
+
 ir_node *be_new_CopyKeep(const arch_register_class_t *cls, ir_graph *irg, ir_node *bl, ir_node *src, int n, ir_node *in_keep[], ir_mode *mode)
 {
        ir_node *irn;
@@ -976,20 +915,14 @@ int be_is_SetSP         (const ir_node *irn) { return be_get_irn_opcode(irn) ==
 int be_is_AddSP         (const ir_node *irn) { return be_get_irn_opcode(irn) == beo_AddSP          ; }
 int be_is_SubSP         (const ir_node *irn) { return be_get_irn_opcode(irn) == beo_SubSP          ; }
 int be_is_RegParams     (const ir_node *irn) { return be_get_irn_opcode(irn) == beo_RegParams      ; }
-int be_is_StackParam    (const ir_node *irn) { return be_get_irn_opcode(irn) == beo_StackParam     ; }
 int be_is_FrameAddr     (const ir_node *irn) { return be_get_irn_opcode(irn) == beo_FrameAddr      ; }
-int be_is_FrameLoad     (const ir_node *irn) { return be_get_irn_opcode(irn) == beo_FrameLoad      ; }
-int be_is_FrameStore    (const ir_node *irn) { return be_get_irn_opcode(irn) == beo_FrameStore     ; }
 int be_is_Barrier       (const ir_node *irn) { return be_get_irn_opcode(irn) == beo_Barrier        ; }
 
 int be_has_frame_entity(const ir_node *irn)
 {
        switch(be_get_irn_opcode(irn)) {
-       case beo_StackParam:
        case beo_Spill:
        case beo_Reload:
-       case beo_FrameStore:
-       case beo_FrameLoad:
        case beo_FrameAddr:
                return 1;
        default:
@@ -1128,11 +1061,6 @@ void be_set_IncSP_pred(ir_node *incsp, ir_node *pred) {
        set_irn_n(incsp, 0, pred);
 }
 
-ir_node *be_get_IncSP_mem(ir_node *irn) {
-       assert(be_is_IncSP(irn));
-       return get_irn_n(irn, 1);
-}
-
 void be_set_IncSP_offset(ir_node *irn, int offset)
 {
        be_stack_attr_t *a = get_irn_attr(irn);
@@ -1268,7 +1196,6 @@ static arch_irn_class_t be_node_classify(const void *self, const ir_node *irn)
                XXX(Perm, perm);
                XXX(Copy, copy);
                XXX(Return, branch);
-               XXX(StackParam, stackparam);
 #undef XXX
                default:
                return arch_irn_class_normal;
@@ -1701,9 +1628,26 @@ static int dump_node(ir_node *irn, FILE *f, dump_reason_t reason)
                        fprintf(f, get_op_name(get_irn_op(irn)));
                        break;
                case dump_node_mode_txt:
-                       fprintf(f, get_mode_name(get_irn_mode(irn)));
+                       if(be_is_Perm(irn) || be_is_Copy(irn) || be_is_CopyKeep(irn)) {
+                               fprintf(f, " %s", get_mode_name(get_irn_mode(irn)));
+                       }
                        break;
                case dump_node_nodeattr_txt:
+                       if(be_is_Call(irn)) {
+                               be_call_attr_t *a = (be_call_attr_t *) at;
+                               if (a->ent)
+                                       fprintf(f, " [%s] ", get_entity_name(a->ent));
+                       }
+                       if(be_is_IncSP(irn)) {
+                               const be_stack_attr_t *attr = get_irn_generic_attr_const(irn);
+                               if(attr->offset == BE_STACK_FRAME_SIZE_EXPAND) {
+                                       fprintf(f, " [Setup Stackframe] ");
+                               } else if(attr->offset == BE_STACK_FRAME_SIZE_SHRINK) {
+                                       fprintf(f, " [Destroy Stackframe] ");
+                               } else {
+                                       fprintf(f, " [%d] ", attr->offset);
+                               }
+                       }
                        break;
                case dump_node_info_txt:
                        dump_node_reqs(f, irn);