X-Git-Url: http://shamusworld.gotdns.org/cgi-bin/gitweb.cgi?p=rmac;a=blobdiff_plain;f=riscasm.c;h=63466716173eef8ae94f8a348d3dd8981e6d479b;hp=79f9ae26425b2b12e1c2b333165bda61ebe5c688;hb=ff8188b7e279f99cf11ac8a283c4146af324d26f;hpb=ada93ab0c3763d4a4ab607cbc73c24d74bc94ff4;ds=sidebyside

diff --git a/riscasm.c b/riscasm.c
index 79f9ae2..6346671 100644
--- a/riscasm.c
+++ b/riscasm.c
@@ -174,7 +174,7 @@ void BuildRISCIntructionWord(unsigned short opcode, int reg1, int reg2)
 //
 int GetRegister(WORD rattr)
 {
-	uint32_t eval;					// Expression value
+	uint64_t eval;				// Expression value
 	WORD eattr;					// Expression attributes
 	SYM * esym;					// External symbol involved in expr.
 	TOKEN r_expr[EXPRSIZE];		// Expression token list
@@ -217,7 +217,7 @@ int GenerateRISCCode(int state)
 	WORD attrflg;
 	int indexed;				// Indexed register flag
 
-	uint32_t eval;					// Expression value
+	uint64_t eval;				// Expression value
 	WORD eattr;					// Expression attributes
 	SYM * esym;					// External symbol involved in expr.
 	TOKEN r_expr[EXPRSIZE];		// Expression token list
@@ -722,7 +722,8 @@ int GenerateRISCCode(int state)
 			{
 				// CC using a constant number
 				tok++;
-				val = *tok;
+				tok++;		// Toss hi LONG, as most likely not 64-bit number
+				val = *tok;	// Use lo LONG
 				tok++;
 				CHECK_COMMA;
 			}