X-Git-Url: http://shamusworld.gotdns.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;ds=sidebyside;f=mach.c;h=be17c79568aece50da2505c7f5ee65307c625e09;hb=3a5a7740b7a06a69852c8f9a7925ed0d00a73f8c;hp=ae5065bf87c85a5c381d72ee917ceb3b96575d0d;hpb=40f1a3ec69fd0f0dade867d8ffcb840add5b21f1;p=rmac

diff --git a/mach.c b/mach.c
index ae5065b..be17c79 100644
--- a/mach.c
+++ b/mach.c
@@ -452,7 +452,7 @@ int m_move(WORD inst, WORD size)
 			ea0gen((WORD)siz);
 
 		if (am1 >= ADISP)
-			ea1gen((WORD)siz);
+			ea1gen((WORD)siz | 0x8000);   // Tell ea1gen we're move ea,ea
 	}
 
 	return 0;