X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=ir%2Fbe%2Fbesched.c;h=64a2cb7ed57d1ba1d6551f8e5cdfae07967bd853;hb=80a6158fdd766f42ee6c508a773bc114ff1b61f3;hp=a2c82b9d9fcca44efefe7760d6a9f256b4744f7a;hpb=a4cf97f91f44fcb14d08f9295bcdef8da372a54d;p=libfirm diff --git a/ir/be/besched.c b/ir/be/besched.c index a2c82b9d9..64a2cb7ed 100644 --- a/ir/be/besched.c +++ b/ir/be/besched.c @@ -15,8 +15,10 @@ #include "irgraph_t.h" #include "iredges_t.h" #include "ircons.h" +#include "irextbb.h" #include "debug.h" +#include "bemodule.h" #include "bearch.h" #include "besched_t.h" #include "beutil.h" @@ -31,6 +33,8 @@ FIRM_IMPL1(sched_first, ir_node *, const ir_node *) FIRM_IMPL1(sched_last, ir_node *, const ir_node *) FIRM_IMPL2(sched_add_after, ir_node *, ir_node *, ir_node *) FIRM_IMPL2(sched_add_before, ir_node *, ir_node *, ir_node *) +FIRM_IMPL1_VOID(sched_init_block, ir_node *) +FIRM_IMPL1_VOID(sched_reset, ir_node *) FIRM_IMPL2(sched_comes_after, int, const ir_node *, const ir_node *) FIRM_IMPL1_VOID(sched_remove, ir_node *) @@ -54,11 +58,13 @@ void be_sched_dump(FILE *f, ir_graph *irg) } /* Init the scheduling stuff. */ -void be_sched_init(void) +void be_init_sched(void) { sched_irn_data_offset = register_additional_node_data(sizeof(sched_info_t)); } +BE_REGISTER_MODULE_CONSTRUCTOR(be_init_sched); + void sched_renumber(const ir_node *block) { ir_node *irn; @@ -204,63 +210,7 @@ ir_node *sched_skip(ir_node *from, int forward, sched_predicator_t *predicator, return curr; } -/** A simple forward single linked list. */ -typedef struct { - ir_node *start; /**< start of the list */ - ir_node *end; /**< last block in the list */ - unsigned n_blks; /**< number of blocks in the list */ -} anchor; - -/** - * Ext-Block walker: create a block schedule - */ -static void create_block_list(ir_extblk *blk, void *env) { - anchor *list = env; - int i, n; - - for (i = 0, n = get_extbb_n_blocks(blk); i < n; ++i) { - ir_node *block = get_extbb_block(blk, i); - - set_irn_link(block, NULL); - if (list->start) - set_irn_link(list->end, block); - else - list->start = block; - - list->end = block; - ++list->n_blks; - } -} - -/* - * Calculates a block schedule. The schedule is stored as a linked - * list starting at the start_block of the irg. - */ -ir_node **sched_create_block_schedule(ir_graph *irg) -{ - anchor list; - ir_node **blk_list, *b, *n; - unsigned i; - - /* schedule extended basic blocks */ - compute_extbb(irg); - - list.start = NULL; - list.end = NULL; - list.n_blks = 0; - irg_extblock_walk_graph(irg, NULL, create_block_list, &list); - - /** create an array, so we can go forward and backward */ - blk_list = NEW_ARR_D(ir_node *, irg->obst,list.n_blks); - - for (i = 0, b = list.start; b; b = n, ++i) { - n = get_irn_link(b); - set_irn_link(b, INT_TO_PTR(i)); - - blk_list[i] = b; - } - return blk_list; -} +//--------------------------------------------------------------------------- typedef struct remove_dead_nodes_env_t_ { ir_graph *irg;