improved example
[libfirm] / ir / be / bemain.c
index 7d5719f..371b4f9 100644 (file)
@@ -155,7 +155,7 @@ static const lc_opt_table_entry_t be_main_options[] = {
        LC_OPT_ENT_BOOL     ("omitleaffp", "omit frame pointer in leaf routines",                 &be_options.omit_leaf_fp),
        LC_OPT_ENT_BOOL     ("pic",        "create PIC code",                                     &be_options.pic),
        LC_OPT_ENT_BOOL     ("gprof",      "create gprof profiling code",                         &be_options.gprof),
-       LC_OPT_ENT_ENUM_PTR ("vrfy",       "verify the backend irg",                              &vrfy_var),
+       LC_OPT_ENT_ENUM_PTR ("verify",       "verify the backend irg",                              &vrfy_var),
        LC_OPT_ENT_BOOL     ("time",       "get backend timing statistics",                       &be_options.timing),
        LC_OPT_ENT_BOOL     ("profile",    "instrument the code for execution count profiling",   &be_options.opt_profile),
        LC_OPT_ENT_ENUM_PTR ("sched",      "select a scheduler",                                  &sched_var),
@@ -473,6 +473,7 @@ static void initialize_birg(be_irg_t *birg, ir_graph *irg, be_main_env_t *env)
        edges_assure(irg);
 
        set_irg_phase_state(irg, phase_backend);
+       be_info_init_irg(irg);
 
        dump(DUMP_INITIAL, irg, "-prepared", dump_ir_block_graph);
 }
@@ -565,13 +566,16 @@ static void be_main_loop(FILE *file_handle, const char *cup_name)
 
        /* we might need 1 birg more for instrumentation constructor */
        num_birgs = backend_irg_list ? ARR_LEN(backend_irg_list) : get_irp_n_irgs();
-       birgs     = alloca(sizeof(birgs[0]) * (num_birgs + 1));
+       birgs     = ALLOCAN(be_irg_t, num_birgs + 1);
+
+       be_info_init();
 
        /* First: initialize all birgs */
        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);
        }
+       arch_env_handle_intrinsics(arch_env);
        DEL_ARR_F(irg_list);
 
        /*
@@ -604,8 +608,6 @@ static void be_main_loop(FILE *file_handle, const char *cup_name)
                /* set the current graph (this is important for several firm functions) */
                current_ir_graph = irg;
 
-               be_sched_init_phase(irg);
-
                /* reset the phi handler. */
                be_phi_handler_reset();
 
@@ -689,11 +691,6 @@ static void be_main_loop(FILE *file_handle, const char *cup_name)
                /* disabled for now, fails for EmptyFor.c and XXEndless.c */
                /* be_live_chk_compare(birg); */
 
-               /* let backend prepare scheduling */
-               BE_TIMER_PUSH(t_codegen);
-               arch_code_generator_before_sched(birg->cg);
-               BE_TIMER_POP(t_codegen);
-
                /* schedule the irg */
                BE_TIMER_PUSH(t_sched);
                switch (be_options.scheduler) {
@@ -864,13 +861,13 @@ static void be_main_loop(FILE *file_handle, const char *cup_name)
                );
 #undef LC_EMIT
 
-               be_sched_free_phase(irg);
-
                be_free_birg(birg);
                stat_ev_ctx_pop("bemain_irg");
        }
        ir_profile_free();
        be_done_env(&env);
+
+       be_info_free();
 }
 
 /* Main interface to the frontend. */
@@ -904,7 +901,7 @@ void be_main(FILE *file_handle, const char *cup_name)
        if (be_options.statev) {
                const char *dot = strrchr(cup_name, '.');
                const char *pos = dot ? dot : cup_name + strlen(cup_name);
-               char       *buf = alloca(pos - cup_name + 1);
+               char       *buf = ALLOCAN(char, pos - cup_name + 1);
                strncpy(buf, cup_name, pos - cup_name);
                buf[pos - cup_name] = '\0';