X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;ds=sidebyside;f=ir%2Fbe%2Fbegnuas.c;h=72b46aa3e86826272814e3e2b1d70c8efe01f934;hb=491bf92f36819d268c3535f72899219cdbb2a985;hp=b41baf3ab6a0b9da7fbc5f6eae9b002f4a05cf96;hpb=15ad7ccd8dff64e1808e1d093d4a8d7cda5af33e;p=libfirm diff --git a/ir/be/begnuas.c b/ir/be/begnuas.c index b41baf3ab..72b46aa3e 100644 --- a/ir/be/begnuas.c +++ b/ir/be/begnuas.c @@ -160,7 +160,7 @@ static void emit_section(be_gas_section_t section, const ir_entity *entity) "text", "data", "rodata", "bss", "ctors", "dtors" }; static const char *const type[] = { - "progbits", "progbits", "progbits", "nobits", "init_array", "fini_array" + "progbits", "progbits", "progbits", "nobits", "progbits", "progbits" }; if (be_gas_object_file_format == OBJECT_FILE_FORMAT_MACH_O) { @@ -1158,15 +1158,14 @@ static void emit_ir_initializer(normal_or_bitfield *vals, if (mode != NULL) { size_t offset_bits = get_entity_offset_bits_remainder(member); - size_t value_len = get_mode_size_bits(mode); - if (offset_bits != 0 || - (value_len != 8 && value_len != 16 && value_len != 32 - && value_len != 64) || - (is_Primitive_type(subtype) && get_primitive_base_type(subtype) != NULL)) { + if (is_Primitive_type(subtype) + && get_primitive_base_type(subtype) != NULL) { emit_bitfield(&vals[offset], offset_bits, sub_initializer, subtype); continue; + } else { + assert(offset_bits == 0); } } @@ -1602,8 +1601,11 @@ static void emit_global(be_gas_decl_env_t *env, const ir_entity *entity) } if (entity_is_null(entity)) { - be_emit_irprintf("\t.space %u, 0\n", get_type_size_bytes(type)); - be_emit_write_line(); + unsigned size = get_type_size_bytes(type); + if (size > 0) { + be_emit_irprintf("\t.space %u, 0\n", get_type_size_bytes(type)); + be_emit_write_line(); + } } else if (entity_has_compound_ent_values(entity)) { emit_compound_graph_init(env, entity); } else { @@ -1657,3 +1659,65 @@ void be_gas_emit_decls(const be_main_env_t *main_env) be_emit_write_line(); } } + +void emit_jump_table(const ir_node *node, long default_pn, ir_entity *entity, + get_cfop_target_func get_cfop_target) +{ + long switch_max = LONG_MIN; + ir_node *default_block = NULL; + unsigned long length; + const ir_edge_t *edge; + unsigned i; + ir_node **table; + + /* go over all proj's and collect them */ + foreach_out_edge(node, edge) { + ir_node *proj = get_edge_src_irn(edge); + long pn = get_Proj_proj(proj); + + /* check for default proj */ + if (pn == default_pn) { + assert(default_block == NULL); /* more than 1 default_pn? */ + default_block = get_cfop_target(proj); + } else { + switch_max = pn > switch_max ? pn : switch_max; + } + } + assert(switch_max > LONG_MIN); + + length = (unsigned long) switch_max + 1; + /* the 16000 isn't a real limit of the architecture. But should protect us + * from seamingly endless compiler runs */ + if (length > 16000) { + /* switch lowerer should have broken this monster to pieces... */ + panic("too large switch encountered"); + } + + table = XMALLOCNZ(ir_node*, length); + foreach_out_edge(node, edge) { + ir_node *proj = get_edge_src_irn(edge); + long pn = get_Proj_proj(proj); + if (pn == default_pn) + continue; + + table[pn] = get_cfop_target(proj); + } + + /* emit table */ + be_gas_emit_switch_section(GAS_SECTION_RODATA); + be_emit_cstring("\t.align 4\n"); + be_gas_emit_entity(entity); + be_emit_cstring(":\n"); + for (i = 0; i < length; ++i) { + ir_node *block = table[i]; + if (block == NULL) + block = default_block; + be_emit_cstring("\t.long "); + be_gas_emit_block_name(block); + be_emit_char('\n'); + be_emit_write_line(); + } + be_gas_emit_switch_section(GAS_SECTION_TEXT); + + xfree(table); +}