diff src/mule-ccl.c @ 4078:6f05405e63fc

[xemacs-hg @ 2007-07-26 11:15:04 by aidan] Fix the union build; thank you Robert Delius Royar.
author aidan
date Thu, 26 Jul 2007 11:15:08 +0000
parents aa28d959af41
children ac5a714be3a2
line wrap: on
line diff
--- a/src/mule-ccl.c	Wed Jul 25 21:51:21 2007 +0000
+++ b/src/mule-ccl.c	Thu Jul 26 11:15:08 2007 +0000
@@ -1562,10 +1562,9 @@
 
 		if (!HTENTRY_CLEAR_P(e))
 		  {
-                    op = e->value;
-		    if (!INTP (op))
+		    if (!INTP (e->value))
 		      CCL_INVALID_CMD;
-		    reg[RRR] = XCHAR_OR_INT (op);
+		    reg[RRR] = XCHAR_OR_INT (e->value);
 		    reg[7] = 1; /* r7 true for success */
 		  }
 		else