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

diff --git a/eagen0.c b/eagen0.c
index 8ac72ed..88ebdb3 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,10 +65,14 @@ 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;
 			}
 
-			if (v + 0x8000 >= 0x18000)
+			if ((v + 0x8000) >= 0x18000)
 				return error(range_error);
 
 			D_word(v);