X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=driver%2Ffirm_machine.c;h=7e751040b823b57eae67fb38a90790114aa3c5b3;hb=ac1cd4a72f73f7906ab1b38bc85cd1758a2f3ab3;hp=de1bf77a7b6571905074d8da409e9eb6ad0ab08f;hpb=15928499880c5cbb6d978860d097fbc84066909e;p=cparser

diff --git a/driver/firm_machine.c b/driver/firm_machine.c
index de1bf77..7e75104 100644
--- a/driver/firm_machine.c
+++ b/driver/firm_machine.c
@@ -14,21 +14,52 @@ static void set_be_option(const char *arg)
 	assert(res);
 }
 
+static ir_entity *underscore_compilerlib_entity_creator(ident *id, ir_type *mt)
+{
+	ir_entity *entity = new_entity(get_glob_type(), id, mt);
+	ident     *ldname = id_mangle3("_", id, "");
+
+	set_entity_visibility(entity, ir_visibility_external);
+	set_entity_ld_ident(entity, ldname);
+
+	return entity;
+}
+
+bool firm_is_unixish_os(const machine_triple_t *machine)
+{
+	const char *os = machine->operating_system;
+	return strstr(os, "linux") != NULL || strstr(os, "bsd") != NULL
+		|| strstart(os, "solaris");
+}
+
+bool firm_is_darwin_os(const machine_triple_t *machine)
+{
+	const char *os = machine->operating_system;
+	return strstart(os, "darwin");
+}
+
+bool firm_is_windows_os(const machine_triple_t *machine)
+{
+	const char *os = machine->operating_system;
+	return strstart(os, "mingw") || streq(os, "win32");
+}
+
 /**
  * Initialize firm codegeneration for a specific operating system.
  * The argument is the operating system part of a target-triple
  */
-static bool setup_os_support(const char *os)
+static bool setup_os_support(const machine_triple_t *machine)
 {
-	if (strstr(os, "linux") != NULL || strstr(os, "bsd") != NULL
-			|| streq(os, "solaris")) {
+	if (firm_is_unixish_os(machine)) {
 		set_be_option("ia32-gasmode=elf");
-	} else if (streq(os, "darwin")) {
+	} else if (firm_is_darwin_os(machine)) {
 		set_be_option("ia32-gasmode=macho");
 		set_be_option("ia32-stackalign=4");
 		set_be_option("pic=true");
-	} else if (strstr(os, "mingw") != NULL || streq(os, "win32")) {
+		set_compilerlib_entity_creator(underscore_compilerlib_entity_creator);
+	} else if (firm_is_windows_os(machine)) {
 		set_be_option("ia32-gasmode=mingw");
+		set_compilerlib_entity_creator(underscore_compilerlib_entity_creator);
 	} else {
 		return false;
 	}
@@ -67,7 +98,7 @@ bool setup_firm_for_machine(const machine_triple_t *machine)
 	}
 
 	/* process operating system */
-	if (!setup_os_support(machine->operating_system)) {
+	if (!setup_os_support(machine)) {
 		fprintf(stderr, "Unknown operating system '%s' in target-triple\n", machine->operating_system);
 		return false;
 	}