X-Git-Url: http://shamusworld.gotdns.org/cgi-bin/gitweb.cgi?p=rmac;a=blobdiff_plain;f=macro.c;h=54d34c43687b3cae932b9c7b5387e55b36a9ce99;hp=ccc93dc2f4cf84a1995b77fdbe19c81404484b71;hb=582df8950c285e1746d0c4a9e3ead6545c962dc8;hpb=689803cff9fd6a81a516486e6e1439ce717607b3

diff --git a/macro.c b/macro.c
index ccc93dc..54d34c4 100644
--- a/macro.c
+++ b/macro.c
@@ -264,7 +264,7 @@ int HandleRept(void)
 		IREPT * irept = inobj->inobj.irept;
 		irept->ir_firstln = firstrpt;
 		irept->ir_nextln = NULL;
-		irept->ir_count = eval;
+		irept->ir_count = (uint32_t)eval;
 	}
 
 	return 0;
@@ -413,8 +413,11 @@ int InvokeMacro(SYM * mac, WORD siz)
 			else if (*tok == CONST)		// Constants are 64-bits
 			{
 				*p++ = *tok++;			// Token
-				*p++ = *tok++;			// Hi LONG
-				*p++ = *tok++;			// Lo LONG
+				uint64_t *p64 = (uint64_t *)p;
+				uint64_t *tok64 = (uint64_t *)tok;
+				*p64++ = *tok64++;
+				tok = (TOKEN *)tok64;
+				p = (uint32_t *)p64;
 			}
 			else if ((*tok == STRING) || (*tok == SYMBOL))
 			{