X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=ir%2Fbe%2Fbemain.c;h=4b8c833251776a5547c3555105eab22629db2eaa;hb=b9d45e08e23bcf058fa8f2d9e18dd78e8cccd044;hp=3f30e7089c61f1ef8cf2b6abcb41cef0a780b249;hpb=4b4900ad188b4276f9c35b9b458927bd57b5a79d;p=libfirm

diff --git a/ir/be/bemain.c b/ir/be/bemain.c
index 3f30e7089..4b8c83325 100644
--- a/ir/be/bemain.c
+++ b/ir/be/bemain.c
@@ -65,6 +65,7 @@
 #include "bestat.h"
 #include "beverify.h"
 #include "beprofile.h"
+#include "be_dbgout.h"
 
 /* options visible for anyone */
 static be_options_t be_options = {
@@ -74,6 +75,7 @@ static be_options_t be_options = {
 	0,                                 /* no opt profile */
 	0,                                 /* disable mris */
 	1,                                 /* try to omit frame pointer */
+	1,                                 /* always stabs debugging output */
 	BE_VRFY_WARN,                      /* verification level: warn */
 	"i44pc52.info.uni-karlsruhe.de",   /* ilp server */
 	"cplex"                            /* ilp solver */
@@ -135,6 +137,7 @@ static const lc_opt_enum_int_items_t vrfy_items[] = {
 /* schedule selector options. */
 static const lc_opt_enum_int_items_t sched_select_items[] = {
 	{ "trivial",  BE_SCHED_SELECT_TRIVIAL  },
+	{ "random",   BE_SCHED_SELECT_RANDOM },
 	{ "regpress", BE_SCHED_SELECT_REGPRESS },
 	{ "muchnik",  BE_SCHED_SELECT_MUCHNIK  },
 	{ "heur",     BE_SCHED_SELECT_HEUR     },
@@ -168,6 +171,7 @@ static const lc_opt_table_entry_t be_main_options[] = {
 	LC_OPT_ENT_ENUM_PTR ("ra",           "register allocator",                                                  &ra_var),
 	LC_OPT_ENT_ENUM_PTR ("isa",          "the instruction set architecture",                                    &isa_var),
 	LC_OPT_ENT_NEGBOOL  ("noomitfp",     "do not omit frame pointer",                                           &be_options.omit_fp),
+	LC_OPT_ENT_BOOL     ("stabs",        "enable stabs debug support",                                          &be_options.stabs_debug_support),
 	LC_OPT_ENT_ENUM_PTR ("vrfy",         "verify the backend irg (off, warn, assert)",                          &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),
@@ -288,12 +292,14 @@ static be_main_env_t *be_init_env(be_main_env_t *env, FILE *file_handle)
 	env->phi_handler = be_phi_handler_new(env->arch_env);
 	arch_env_push_irn_handler(env->arch_env, env->phi_handler);
 
+	env->db_handle = be_options.stabs_debug_support ? be_stabs_open(file_handle) : be_nulldbg_open();
 	return env;
 }
 
 static void be_done_env(be_main_env_t *env)
 {
 	env->arch_env->isa->impl->done(env->arch_env->isa);
+	be_dbg_close(env->db_handle);
 	be_phi_handler_free(env->phi_handler);
 	obstack_free(&env->obst, NULL);
 }
@@ -397,8 +403,9 @@ static void initialize_birg(be_irg_t *birg, ir_graph *irg, be_main_env_t *env)
  * and call the architecture specific code generator.
  *
  * @param file_handle   the file handle the output will be written to
+ * @param cup_name      name of the compilation unit
  */
-static void be_main_loop(FILE *file_handle, const char *asm_file_name)
+static void be_main_loop(FILE *file_handle, const char *cup_name)
 {
 	int i;
 	arch_isa_t *isa;
@@ -411,6 +418,8 @@ static void be_main_loop(FILE *file_handle, const char *asm_file_name)
 	be_irg_t *birgs;
 	unsigned num_birgs;
 
+	be_ra_timer_t *ra_timer;
+
 #ifdef WITH_LIBCORE
 	lc_timer_t *t_abi      = NULL;
 	lc_timer_t *t_codegen  = NULL;
@@ -421,7 +430,6 @@ static void be_main_loop(FILE *file_handle, const char *asm_file_name)
 	lc_timer_t *t_emit     = NULL;
 	lc_timer_t *t_other    = NULL;
 	lc_timer_t *t_verify   = NULL;
-	be_ra_timer_t *ra_timer;
 
 	if (be_options.timing == BE_TIME_ON) {
 		t_abi      = lc_timer_register("beabi",    "be abi introduction");
@@ -440,6 +448,9 @@ static void be_main_loop(FILE *file_handle, const char *asm_file_name)
 
 	isa = arch_env_get_isa(env.arch_env);
 
+	be_dbg_so(env.db_handle, cup_name);
+	be_dbg_types(env.db_handle);
+
 	/* we might need 1 birg more for instrumentation constructor */
 	num_birgs = get_irp_n_irgs();
 	birgs     = alloca(sizeof(birgs[0]) * (num_birgs + 1));
@@ -456,7 +467,7 @@ static void be_main_loop(FILE *file_handle, const char *asm_file_name)
 		Beware: '\0' is already included in sizeof(suffix)
 	*/
 	memset(prof_filename, 0, sizeof(prof_filename));
-	strncpy(prof_filename, asm_file_name, sizeof(prof_filename) - sizeof(suffix));
+	strncpy(prof_filename, cup_name, sizeof(prof_filename) - sizeof(suffix));
 	strcat(prof_filename, suffix);
 
 	/*
@@ -464,7 +475,7 @@ static void be_main_loop(FILE *file_handle, const char *asm_file_name)
 		or try to read in profile data for current translation unit.
 	*/
 	if (be_options.opt_profile) {
-		ir_graph *prof_init_irg = be_profile_instrument(prof_filename);
+		ir_graph *prof_init_irg = be_profile_instrument(prof_filename, profile_default);
 		initialize_birg(&birgs[num_birgs], prof_init_irg, &env);
 		num_birgs++;
 		set_method_img_section(get_irg_entity(prof_init_irg), section_constructors);
@@ -711,7 +722,7 @@ static void be_main_loop(FILE *file_handle, const char *asm_file_name)
 }
 
 /* Main interface to the frontend. */
-void be_main(FILE *file_handle, const char *asm_file_name)
+void be_main(FILE *file_handle, const char *cup_name)
 {
 #ifdef WITH_LIBCORE
 	lc_timer_t *t = NULL;
@@ -743,7 +754,7 @@ void be_main(FILE *file_handle, const char *asm_file_name)
 	set_visit_pseudo_irgs(0);
 
  	be_node_init();
-	be_main_loop(file_handle, asm_file_name);
+	be_main_loop(file_handle, cup_name);
 
 #ifdef WITH_LIBCORE
 	if (be_options.timing == BE_TIME_ON) {