X-Git-Url: http://shamusworld.gotdns.org/cgi-bin/gitweb.cgi?p=rmac;a=blobdiff_plain;f=procln.c;h=2cd1bdc3d513b6b7476d33cea3c59b0e09f8b357;hp=3b8c607db3c8c5ed40ffc6778da64bda7e36aa86;hb=66be644c3e5fbd7446d86c79e9e51b75c0442b49;hpb=171a457e86f686cf2adddc91baa9d9e703264259

diff --git a/procln.c b/procln.c
index 3b8c607..2cd1bdc 100644
--- a/procln.c
+++ b/procln.c
@@ -660,6 +660,9 @@ When checking to see if it's already been equated, issue a warning.
 		goto loop;
 	}
 
+	// Keep a backup of chptr (used for optimisations during codegen)
+	chptr_opcode = chptr;
+
 	for(;;)
 	{
 		if ((m->mnattr & siz) && (amsk0 & m->mn0) != 0 && (amsk1 & m->mn1) != 0)