[COMMIT] Re: Cannot build latest CVS of 21.5.28 (possible cause)

[Aidan Kehoe]

 Ar an ceathrú lá is fiche de mí Iúil, scríobh robert delius royar: 

 > I had time to recompile without '--with-union-type'  The file mule-ccl.c 
 > compiles.  This implies to me that in the recent revisions there are 
 > assumptions that LispObject is an int rather than a union.

Yeah, my mistake. Thank you!

APPROVE COMMIT

NOTE: This patch has been committed.

src/ChangeLog addition:

2007-07-26  Aidan Kehoe  <kehoea at parhasard.net>

	* mule-ccl.c (ccl_driver):
	op is an integer, not a Lisp_Object; don't use it to temporarily
	store a Lisp_Object. This change fixes the union build; thank you
	for the report, Robert Delius Royar. 


XEmacs Trunk source patch:
Diff command:   cvs -q diff -u
Files affected: src/mule-ccl.c
===================================================================
RCS

Index: src/mule-ccl.c
===================================================================
RCS file: /pack/xemacscvs/XEmacs/xemacs/src/mule-ccl.c,v
retrieving revision 1.32
diff -u -r1.32 mule-ccl.c
--- src/mule-ccl.c	2007/07/22 22:04:14	1.32
+++ src/mule-ccl.c	2007/07/26 11:13:26
@@ -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

-- 
On the quay of the little Black Sea port, where the rescued pair came once
more into contact with civilization, Dobrinton was bitten by a dog which was
assumed to be mad, though it may only have been indiscriminating. (Saki)