projects
/
libfirm
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
fixed debug output of unary x87 nodes
[libfirm]
/
ir
/
be
/
bessadestr.c
diff --git
a/ir/be/bessadestr.c
b/ir/be/bessadestr.c
index
4d73a0d
..
4ef0fae
100644
(file)
--- a/
ir/be/bessadestr.c
+++ b/
ir/be/bessadestr.c
@@
-35,7
+35,7
@@
DEBUG_ONLY(static firm_dbg_module_t *dbg = NULL;)
#define get_reg(irn) arch_get_irn_register(get_chordal_arch(chordal_env), irn)
#define set_reg(irn, reg) arch_set_irn_register(get_chordal_arch(chordal_env), irn, reg)
#define get_reg(irn) arch_get_irn_register(get_chordal_arch(chordal_env), irn)
#define set_reg(irn, reg) arch_set_irn_register(get_chordal_arch(chordal_env), irn, reg)
-#define is_Perm(irn) (arch_irn_class
ify(arch_env, irn) == arch_irn_class_perm
)
+#define is_Perm(irn) (arch_irn_class
_is(arch_env, irn, perm)
)
#define get_reg_cls(irn) (arch_get_irn_reg_class(arch_env, irn, -1))
#define is_curr_reg_class(irn) (get_reg_cls(p) == chordal_env->cls)
#define get_reg_cls(irn) (arch_get_irn_reg_class(arch_env, irn, -1))
#define is_curr_reg_class(irn) (get_reg_cls(p) == chordal_env->cls)
@@
-291,8
+291,8
@@
static void set_regs_or_place_dupls_walker(ir_node *bl, void *data) {
pin it
*/
ir_node *perm = get_Proj_pred(arg);
pin it
*/
ir_node *perm = get_Proj_pred(arg);
- ir_node *
orig_val = get_irn_n(perm, get_Proj_proj(arg)
);
- ir_node *
dupl = be_new_Copy(cls, chordal_env->irg, arg_block, orig_val)
;
+ ir_node *
dupl = be_new_Copy(cls, chordal_env->irg, arg_block, arg
);
+ ir_node *
ins
;
/* this is commented out because it will fail in case of unknown float */
#if 0
/* this is commented out because it will fail in case of unknown float */
#if 0
@@
-310,7
+310,9
@@
static void set_regs_or_place_dupls_walker(ir_node *bl, void *data) {
set_irn_n(phi, i, dupl);
set_reg(dupl, phi_reg);
set_irn_n(phi, i, dupl);
set_reg(dupl, phi_reg);
- sched_add_before(perm, dupl);
+ /* skip the Perm's Projs and insert the copies behind. */
+ for(ins = sched_next(perm); is_Proj(ins); ins = sched_next(ins));
+ sched_add_before(ins, dupl);
pin_irn(dupl, phi_block);
DBG((dbg, LEVEL_1, " arg is pinned: insert %+F(%s)\n", dupl, get_reg(dupl)->name));
} else {
pin_irn(dupl, phi_block);
DBG((dbg, LEVEL_1, " arg is pinned: insert %+F(%s)\n", dupl, get_reg(dupl)->name));
} else {