# HG changeset patch
# User Mike Pavone <pavone@retrodev.com>
# Date 1357525877 28800
# Node ID a1c3ecb4823faafa4cf7bf27d0ee73537f975e6a
# Parent  47b2796fb277d751fa3ad687e28e99af39d9048f
Implement areg displacement mode for jsr

diff -r 47b2796fb277 -r a1c3ecb4823f m68k_to_x86.c
--- a/m68k_to_x86.c	Sun Jan 06 15:20:23 2013 -0800
+++ b/m68k_to_x86.c	Sun Jan 06 18:31:17 2013 -0800
@@ -1945,6 +1945,30 @@
 			dst = jmp_r(dst, SCRATCH1);
 		}
 		break;
+	case MODE_AREG_DISPLACE:
+		dst = cycles(dst, BUS*2);
+		dst = mov_ir(dst, inst->address + 2, SCRATCH1, SZ_D);
+		if (opts->flags & OPT_NATIVE_CALL_STACK) {
+			dst = push_r(dst, SCRATCH1);
+		}
+		dst = sub_ir(dst, 4, opts->aregs[7], SZ_D);
+		dst = mov_rr(dst, opts->aregs[7], SCRATCH2, SZ_D);
+		dst = call(dst, (char *)m68k_write_long_highfirst);
+		if (opts->aregs[inst->src.params.regs.pri] >= 0) {
+			dst = mov_rr(dst, opts->aregs[inst->src.params.regs.pri], SCRATCH1, SZ_D);
+		} else {
+			dst = mov_rdisp8r(dst, CONTEXT, offsetof(m68k_context, aregs) + 4 * inst->src.params.regs.pri, SCRATCH1, SZ_D);
+		}
+		dst = add_ir(dst, inst->src.params.regs.displacement, SCRATCH1, SZ_D);
+		dst = call(dst, (uint8_t *)m68k_native_addr);
+		if (opts->flags & OPT_NATIVE_CALL_STACK) {
+			dst = call_r(dst, SCRATCH1);
+			//would add_ir(dst, 8, RSP, SZ_Q) be faster here?
+			dst = pop_r(dst, SCRATCH1);
+		} else {
+			dst = jmp_r(dst, SCRATCH1);
+		}
+		break;
 	case MODE_AREG_INDEX_DISP8:
 		dst = cycles(dst, BUS*3);//TODO: CHeck that this is correct
 		dst = mov_ir(dst, inst->address + 4, SCRATCH1, SZ_D);