+ /* this implementation only works with frame pointers currently */
+ assert(layout->sp_relative == false);
+
+ /* TODO: this implementation is slower than necessary.
+ The longterm goal is however to avoid the memperm node completely */
+
+ memperm_arity = be_get_MemPerm_entity_arity(node);
+ // we use our local registers - so this is limited to 8 inputs !
+ if (memperm_arity > 8)
+ panic("memperm with more than 8 inputs not supported yet");
+
+ be_emit_irprintf("\tsub %%sp, %d, %%sp", memperm_arity*4);
+ be_emit_finish_line_gas(node);
+
+ for (i = 0; i < memperm_arity; ++i) {
+ ir_entity *entity = be_get_MemPerm_in_entity(node, i);
+ int offset = be_get_stack_entity_offset(layout, entity, 0);
+
+ /* spill register */
+ be_emit_irprintf("\tst %%l%d, [%%sp%+d]", i, sp_change + SPARC_MIN_STACKSIZE);
+ be_emit_finish_line_gas(node);
+
+ /* load from entity */
+ be_emit_irprintf("\tld [%%fp%+d], %%l%d", offset, i);
+ be_emit_finish_line_gas(node);
+ sp_change += 4;
+ }
+
+ for (i = memperm_arity-1; i >= 0; --i) {
+ ir_entity *entity = be_get_MemPerm_out_entity(node, i);
+ int offset = be_get_stack_entity_offset(layout, entity, 0);
+
+ sp_change -= 4;
+
+ /* store to new entity */
+ be_emit_irprintf("\tst %%l%d, [%%fp%+d]", i, offset);
+ be_emit_finish_line_gas(node);
+ /* restore register */
+ be_emit_irprintf("\tld [%%sp%+d], %%l%d", sp_change + SPARC_MIN_STACKSIZE, i);
+ be_emit_finish_line_gas(node);
+ }
+
+ be_emit_irprintf("\tadd %%sp, %d, %%sp", memperm_arity*4);
+ be_emit_finish_line_gas(node);
+
+ assert(sp_change == 0);
+}
+
+static void emit_be_Return(const ir_node *node)
+{
+ const char *destreg = "%o7";
+
+ /* hack: we don't explicitely model register changes because of the
+ * restore node. So we have to do it manually here */
+ if (delay_slot_filler != NULL &&
+ (is_sparc_Restore(delay_slot_filler)
+ || is_sparc_RestoreZero(delay_slot_filler))) {
+ destreg = "%i7";
+ }
+ be_emit_cstring("\tjmp ");
+ be_emit_string(destreg);
+ be_emit_cstring("+8");
+ be_emit_finish_line_gas(node);
+ fill_delay_slot();
+}
+
+static void emit_sparc_FrameAddr(const ir_node *node)
+{
+ const sparc_attr_t *attr = get_sparc_attr_const(node);
+
+ // no need to fix offset as we are adressing via the framepointer
+ if (attr->immediate_value >= 0) {
+ be_emit_cstring("\tadd ");
+ sparc_emit_source_register(node, 0);
+ be_emit_cstring(", ");
+ be_emit_irprintf("%ld", attr->immediate_value);
+ } else {
+ be_emit_cstring("\tsub ");
+ sparc_emit_source_register(node, 0);
+ be_emit_cstring(", ");
+ be_emit_irprintf("%ld", -attr->immediate_value);
+ }
+
+ be_emit_cstring(", ");
+ sparc_emit_dest_register(node, 0);
+ be_emit_finish_line_gas(node);
+}
+
+static const char *get_icc_unsigned(ir_relation relation)