added new default emitter function for Copy and Perm
[libfirm] / ir / be / beconstrperm.c
index 5e3d4b3..f493ba7 100644 (file)
@@ -5,35 +5,44 @@
  * Licence:     This file protected by GPL -  GNU GENERAL PUBLIC LICENSE.
  *
  */
+#ifdef HAVE_CONFIG_H
+#include "config.h"
+#endif
 
 #include "irgraph_t.h"
 #include "irnode_t.h"
 #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 (cenv->cls == arch_get_irn_reg_class(aenv, irn, pos) && req.type == arch_register_req_type_limited) {
+                               insert_Perm_after(menv, cenv->cls, cenv->dom_front, sched_prev(irn));
+                               /* TODO: Next line is overkill. Update_liveness would suffice. */
+                               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);
 }