X-Git-Url: http://shamusworld.gotdns.org/cgi-bin/gitweb.cgi?p=rmac;a=blobdiff_plain;f=eagen0.c;h=bf4ba3da6ab64fdb093df39ac9944b82d8f109d5;hp=8ac72ed3824ff3e2cd7055805d3ff276439aa590;hb=0fd4b86c9899d254d9aea0660e5046c4234cfd42;hpb=66be644c3e5fbd7446d86c79e9e51b75c0442b49

diff --git a/eagen0.c b/eagen0.c
index 8ac72ed..bf4ba3d 100644
--- a/eagen0.c
+++ b/eagen0.c
@@ -39,7 +39,7 @@ int eaNgen(WORD siz)
 			if (tdb)
 				rmark(cursect, sloc, tdb, MWORD, NULL);
 
-			if ((v == 0) && optim_flag)
+			if ((v == 0) && optim_flags[OPT_INDIRECT_DISP])
 			{
 				// If expr is 0, size optimise the opcode.
 				// Generally the lower 6 bits of the opcode
@@ -65,6 +65,10 @@ int eaNgen(WORD siz)
 					chptr_opcode[0] |= ((0x0080 >> 8) & 255); // slap in 010 bits
 					chptr_opcode[1] |= 0x0080 & 255;          // slap in 010 bits
 				}
+
+				if (sbra_flag)
+					warn("0(An) converted to (An)");
+
 				return OK;
 			}