fixed DEL_ARR_F

[libfirm] / ir / be / bemain.c

diff --git a/ir/be/bemain.c b/ir/be/bemain.c
index aac1732..42dd4fe 100644 (file)
--- a/ir/be/bemain.c
+++ b/ir/be/bemain.c
@@ -218,7 +218,6 @@ const backend_params *be_init(void)
 {
        be_opt_register();
        be_init_modules();
-       phi_class_init();
 
        if (isa_if->get_params)
                return isa_if->get_params();
@@ -374,6 +373,7 @@ static void be_main_loop(FILE *file_handle, const char *cup_name)
        static const char suffix[] = ".prof";
        be_irg_t *birgs;
        unsigned num_birgs;
+       ir_graph **irg_list, **backend_irg_list;
 
        be_ra_timer_t *ra_timer;
 
@@ -408,16 +408,24 @@ static void be_main_loop(FILE *file_handle, const char *cup_name)
        be_dbg_so(env.db_handle, cup_name);
        be_dbg_types(env.db_handle);
 
+       /* backend may provide an ordered list of irgs where code should be generated for */
+       irg_list = NEW_ARR_F(ir_graph *, 0);
+       backend_irg_list = arch_isa_get_backend_irg_list(isa, irg_list);
+
        /* we might need 1 birg more for instrumentation constructor */
-       num_birgs = get_irp_n_irgs();
+       num_birgs = backend_irg_list ? ARR_LEN(backend_irg_list) : get_irp_n_irgs();
        birgs     = alloca(sizeof(birgs[0]) * (num_birgs + 1));
 
        /* First: initialize all birgs */
-       for(i = 0; i < get_irp_n_irgs(); ++i) {
-               ir_graph *irg = get_irp_irg(i);
-
+       for(i = 0; i < num_birgs; ++i) {
+               ir_graph *irg = backend_irg_list ? backend_irg_list[i] : get_irp_irg(i);
                initialize_birg(&birgs[i], irg, &env);
        }
+       /* TODO: DEL_ARR_F(irg_list) will break, if list was modified by Backend ?!?! */
+       if (backend_irg_list)
+               DEL_ARR_F(backend_irg_list);
+       else
+               DEL_ARR_F(irg_list);
 
        /*
                Get the filename for the profiling data.
@@ -443,7 +451,7 @@ static void be_main_loop(FILE *file_handle, const char *cup_name)
 
        /* For all graphs */
        for (i = 0; i < num_birgs; ++i) {
-               be_irg_t *birg = & birgs[i];
+               be_irg_t *birg = &birgs[i];
                ir_graph *irg  = birg->irg;
                optimization_state_t state;
                const arch_code_generator_if_t *cg_if;