X-Git-Url: http://shamusworld.gotdns.org/cgi-bin/gitweb.cgi?p=rmac;a=blobdiff_plain;f=procln.c;h=8917004b258d4cc6e74b7f2f6ecb751723486222;hp=fe13aa760a822f649fd054805273c5ed3931cfc7;hb=29fa5dcf504b966803063a1c2891f58f97126d04;hpb=bdbf34766f4d074a5933eb1326fe4ce03d249e10

diff --git a/procln.c b/procln.c
index fe13aa7..8917004 100644
--- a/procln.c
+++ b/procln.c
@@ -587,7 +587,7 @@ When checking to see if it's already been equated, issue a warning.
 		if (list_flag)					// Put value in listing
 			listvalue((uint32_t)eval);
 
-		at_eol();						// Must be at EOL now
+		ErrorIfNotAtEOL();				// Must be at EOL now
 		goto loop;
 	}
 
@@ -782,11 +782,24 @@ When checking to see if it's already been equated, issue a warning.
 				parcode = 0;
 			}
 
+#if 1
 			while ((dsp_am0 & md->mn0) == 0 || (dsp_am1 & md->mn1) == 0)
 				md = &dsp56k_machtab[md->mncont];
 
 			(*md->mnfunc)(md->mninst | (parcode << 8));
 			goto loop;
+#else
+			for(;;)
+			{
+				if ((dsp_am0 & md->mn0) != 0 && (dsp_am1 & md->mn1) != 0)
+				{
+					(*md->mnfunc)(md->mninst|(parcode << 8));
+					goto loop;
+				}
+
+				md = &dsp56k_machtab[md->mncont];
+			}
+#endif
 		}
 	}