- properties changed

[libfirm] / ir / ir / ircgcons.c

diff --git a/ir/ir/ircgcons.c b/ir/ir/ircgcons.c
index 5cba4bb..558f576 100644 (file)
--- a/ir/ir/ircgcons.c
+++ b/ir/ir/ircgcons.c
@@ -203,6 +203,7 @@ static ir_node * create_Block(int n, ir_node ** in) {
   ir_node * block;
   set_optimize(0);
   block = new_Block(n, in);
+  set_cur_block(block);
   set_optimize(rem_opt);
   return block;
 }
@@ -624,7 +625,7 @@ static void construct_call(ir_node * call) {
                      get_Block_cfgpred_arr(post_block)); /* block vor dem Aufruf (mit CallBegin) */
   except_block = NULL;
   jmp = new_Break(); /* Sprung für intraprozedurale Darstellung (in    * pre_block) */
-  call_begin = new_CallBegin(call); /* (in pre_block) */
+  call_begin = new_CallBegin(get_Call_ptr(call), call); /* (in pre_block) */
   /* CallBegin might be entry to endless recursion. */
   add_End_keepalive(get_irg_end(get_irn_irg(pre_block)), pre_block);