From: Daniel Grund <grund@cs.uni-saarland.de>
Date: Wed, 21 Dec 2005 17:28:19 +0000 (+0000)
Subject: Bugfix and better impl.
X-Git-Url: http://nsz.repo.hu/git/?a=commitdiff_plain;h=3624a2667e9a0ad86f74aa1c1fb44aaa7b888199;p=libfirm

Bugfix and better impl.
---

diff --git a/ir/be/beconstrperm.c b/ir/be/beconstrperm.c
index e7e16a706..9c30b4a74 100644
--- a/ir/be/beconstrperm.c
+++ b/ir/be/beconstrperm.c
@@ -14,29 +14,34 @@
 #include "irgwalk.h"
 
 #include "bearch.h"
+#include "belive_t.h"
 #include "benode_t.h"
 #include "besched_t.h"
 #include "beconstrperm.h"
 
-static void walker_insert_constr_perms(ir_node *irn, void *env) {
+static void walker_insert_constr_perms(ir_node *bl, void *env) {
+	ir_node *irn;
 	be_chordal_env_t *cenv = env;
 	const be_main_env_t *menv = cenv->main_env;
 	const arch_env_t *aenv = menv->arch_env;
 	arch_register_req_t req;
 	int pos, max;
 
-	/* check for a restriction of the result (-1) and the operands (0..n) */
-	max = get_irn_arity(irn);
-	for(pos=-1; pos<max; ++pos) {
-		arch_get_register_req(aenv, &req, irn, pos);
-		/* if a restriction is found, insert a perm before the irn */
-		if (req.type == arch_register_req_type_limited) {
-			insert_Perm_after(menv, cenv->cls, cenv->dom_front, sched_prev(irn));
-			break;
+	sched_foreach(bl, irn) {
+		/* check for a restriction of the result (-1) or one of the operands (0..n) */
+		max = get_irn_arity(irn);
+		for(pos=-1; pos<max; ++pos) {
+			arch_get_register_req(aenv, &req, irn, pos);
+			/* if a restriction is found, insert a perm before the irn */
+			if (req.type == arch_register_req_type_limited) {
+				insert_Perm_after(menv, cenv->cls, cenv->dom_front, sched_prev(irn));
+				be_liveness(get_irn_irg(bl));
+				break;
+			}
 		}
 	}
 }
 
 void be_insert_constr_perms(be_chordal_env_t *cenv) {
-	irg_walk_graph(cenv->irg, walker_insert_constr_perms, NULL, cenv);
+	irg_block_walk_graph(cenv->irg, walker_insert_constr_perms, NULL, cenv);
 }