From: Shamus Hammons <jlhamm@acm.org>
Date: Mon, 20 Aug 2018 15:35:12 +0000 (-0500)
Subject: Now we're pretty sure that the codebase doesn't cause any regressions.
X-Git-Tag: v2.1.0~67
X-Git-Url: http://shamusworld.gotdns.org/cgi-bin/gitweb.cgi?p=rmac;a=commitdiff_plain;h=0561939cf64e5d66153c2e7903e2411b802ff5c8;hp=30a208654896284b50e7b362e97d3e63ec717b96

Now we're pretty sure that the codebase doesn't cause any regressions.
---

diff --git a/parmode.h b/parmode.h
index 4d37cdb..13b83fc 100644
--- a/parmode.h
+++ b/parmode.h
@@ -1169,7 +1169,7 @@ CHK_FOR_DISPn:
 			// expr[.L]
 			AMn = ABSL;
 
-			// Is .L forced here?
+			// .L is forced here
 			if (*tok == DOTL)
 			{
 				tok++;
@@ -1177,8 +1177,8 @@ CHK_FOR_DISPn:
 			}
 			else
 			{
-				// Defined, absolute values from $FFFF8000..$00007FFF get optimized
-				// to absolute short
+				// Defined, absolute values from $FFFF8000..$00007FFF get
+				// optimized to absolute short
 				if (CHECK_OPTS(OPT_ABS_SHORT)
 					&& ((AnEXATTR & (TDB | DEFINED)) == DEFINED)
 					&& (((uint32_t)AnEXVAL + 0x8000) < 0x10000))
diff --git a/procln.c b/procln.c
index d7bf53c..0bb52e6 100644
--- a/procln.c
+++ b/procln.c
@@ -854,9 +854,11 @@ When checking to see if it's already been equated, issue a warning.
 	// Keep a backup of chptr (used for optimisations during codegen)
 	chptr_opcode = chptr;
 
-	while ((m->mnattr & siz) && (amsk0 & m->mn0) == 0 || (amsk1 & m->mn1) == 0)
+	while (!(m->mnattr & siz) || (amsk0 & m->mn0) == 0 || (amsk1 & m->mn1) == 0)
 		m = &machtab[m->mncont];
 
+	DEBUG { printf("    68K: mninst=$%X, siz=$%X, mnattr=$%X, amsk0=$%X, mn0=$%X, amsk1=$%X, mn1=$%X\n", m->mninst, siz, m->mnattr, amsk0, m->mn0, amsk1, m->mn1); }
+
 	(*m->mnfunc)(m->mninst, siz);
 	goto loop;
 }