X-Git-Url: http://shamusworld.gotdns.org/cgi-bin/gitweb.cgi?p=rmac;a=blobdiff_plain;f=riscasm.c;h=63466716173eef8ae94f8a348d3dd8981e6d479b;hp=33c8cd3f7023f5633ffa006e004afe9da2ef105d;hb=ff8188b7e279f99cf11ac8a283c4146af324d26f;hpb=96a5cd69571096f11a3a2a40f6133374f0adc9bb

diff --git a/riscasm.c b/riscasm.c
index 33c8cd3..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)
 {
-	VALUE 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
 
-	VALUE 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;
 			}