X-Git-Url: http://shamusworld.gotdns.org/cgi-bin/gitweb.cgi?p=rmac;a=blobdiff_plain;f=expr.c;h=5474af8c36fa9cec7fd7506e5d230641d47f1462;hp=20f43cfcb3aace6feb23228e635f8a1cfd5d4dc1;hb=4ca28ba07da9f3848c2e3db0e2e9cbcaa787dd29;hpb=2ede3731285f3bc20f5493de593442e872db4d32

diff --git a/expr.c b/expr.c
index 20f43cf..5474af8 100644
--- a/expr.c
+++ b/expr.c
@@ -230,6 +230,11 @@ int expr2(void)
 	switch (*tok++)
 	{
 	case CONST:
+		ptk.u32 = tok;
+		*evalTokenBuffer.u32++ = CONST;
+		*evalTokenBuffer.u64++ = *ptk.u64++;
+		tok = ptk.u32;
+		break;
 	case FCONST:
 		ptk.u32 = tok;
 		*evalTokenBuffer.u32++ = CONST;