renamed function to be_gas_label_prefix()

[libfirm] / ir / ana / cgana.c

diff --git a/ir/ana/cgana.c b/ir/ana/cgana.c
index 9d6366b..c7cc051 100644 (file)
--- a/ir/ana/cgana.c
+++ b/ir/ana/cgana.c
@@ -740,6 +740,7 @@ static void callee_ana_node(ir_node *node, eset *methods) {
  * callees for that call.
  */
 static void callee_walker(ir_node * call, void * env) {
+  (void) env;
   if (is_Call(call)) {
     eset * methods = eset_create();
     ir_entity * ent;
@@ -763,10 +764,12 @@ static void callee_walker(ir_node * call, void * env) {
        * eine Bad-Operation. Die Verlinkung muss wiederhergestellt
        * werden! */
       ir_node *mem = get_Call_mem(call);
-      turn_into_tuple (call, 5 /* pn_Call_max */);
+      ir_node *blk = get_nodes_block(call);
+      turn_into_tuple (call, pn_Call_max);
       set_Tuple_pred(call, pn_Call_M_regular       , mem);
       set_Tuple_pred(call, pn_Call_T_result        , new_Bad());
       set_Tuple_pred(call, pn_Call_P_value_res_base, new_Bad());
+      set_Tuple_pred(call, pn_Call_X_regular       , new_r_Jmp(current_ir_graph, blk));
       set_Tuple_pred(call, pn_Call_X_except        , new_Bad());  /* new_Jmp() ?? new_Raise() ?? */
       set_Tuple_pred(call, pn_Call_M_except        , new_Bad());
 
@@ -785,6 +788,7 @@ static void callee_walker(ir_node * call, void * env) {
  */
 static void remove_Tuples(ir_node *proj, void *env) {
   ir_node *nn;
+  (void) env;
   if (! is_Proj(proj)) return;
 
   nn = skip_Tuple(proj);
@@ -831,6 +835,7 @@ static void sel_methods_dispose(void) {
 /*--------------------------------------------------------------------------*/
 
 static void destruct_walker(ir_node * node, void * env) {
+  (void) env;
   if (is_Call(node)) {
     remove_Call_callee_arr(node);
   }