+ /* 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_sparc_FrameAddr(const ir_node *node)