X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=ir%2Fana%2Fcgana.c;h=f3cf4b600346e1c7d8e056f54660e74d5d4505d5;hb=dd4cd761ab637d4488c7e29f49843b1b02366acf;hp=722f6f352b7ef576ce50b267f0f9effe8373970d;hpb=9b8d6b2f436d24e691205370b9bbc6fbed89d6b2;p=libfirm

diff --git a/ir/ana/cgana.c b/ir/ana/cgana.c
index 722f6f352..f3cf4b600 100644
--- a/ir/ana/cgana.c
+++ b/ir/ana/cgana.c
@@ -348,7 +348,7 @@ static void free_mark_proj(ir_node * node, long n, eset * set) {
 		 * op_Tuple oder ein Knoten, der in "free_ana_walker" behandelt
 		 * wird. */
 		ir_node * pred = get_Proj_pred(node);
-		if (get_irn_link(pred) != MARK && get_irn_op(pred) == op_Tuple) {
+		if (get_irn_link(pred) != MARK && is_Tuple(pred)) {
 			free_mark_proj(get_Tuple_pred(pred, get_Proj_proj(node)), n, set);
 		} else {
 			/* nothing: da in "free_ana_walker" behandelt. */
@@ -606,11 +606,11 @@ static ir_entity **get_free_methods(int *length)
 			eset_insert(free_set, ent);
 		}
 
-		set_using_irn_link(irg);
+		ir_reserve_resources(irg, IR_RESOURCE_IRN_LINK);
 		/* Find all method entities that gets "visible" through this graphs,
 		 * for instance because their address is stored. */
 		irg_walk_graph(irg, firm_clear_link, free_ana_walker, free_set);
-		clear_using_irn_link(irg);
+		ir_free_resources(irg, IR_RESOURCE_IRN_LINK);
 	}
 
 	/* insert all methods that are used in global variables initializers */
@@ -742,13 +742,6 @@ static void callee_ana_node(ir_node *node, eset *methods) {
 		callee_ana_node(get_Mux_true(node), methods);
 		break;
 
-	case iro_Psi:
-		for (i = get_Psi_n_conds(node) - 1; i >= 0; --i) {
-			callee_ana_node(get_Psi_val(node, i), methods);
-		}
-		callee_ana_node(get_Psi_default(node), methods);
-		break;
-
 	case iro_Id:
 		callee_ana_node(get_Id_pred(node), methods);
 		break;