# HG changeset patch
# User Ben Wing <ben@xemacs.org>
# Date 1265524374 21600
# Node ID ebafcd6e9f4bf63b7ea81ca7a5cf89e18ba09603
# Parent  b46c89ccbed3cabd501941b531debd9023ad01de
fix compile error in mapcarX

-------------------- ChangeLog entries follow: --------------------

src/ChangeLog addition:

2010-02-07  Ben Wing  <ben@xemacs.org>

	* fns.c (mapcarX):
	C++ requires explicit cast to enum lrecord_type.

diff -r b46c89ccbed3 -r ebafcd6e9f4b src/ChangeLog
--- a/src/ChangeLog	Sat Feb 06 12:28:19 2010 +0000
+++ b/src/ChangeLog	Sun Feb 07 00:32:54 2010 -0600
@@ -1,3 +1,8 @@
+2010-02-07  Ben Wing  <ben@xemacs.org>
+
+	* fns.c (mapcarX):
+	C++ requires explicit cast to enum lrecord_type.
+
 2010-02-06  Ben Wing  <ben@xemacs.org>
 
 	* mule-wnnfns.c:
diff -r b46c89ccbed3 -r ebafcd6e9f4b src/fns.c
--- a/src/fns.c	Sat Feb 06 12:28:19 2010 +0000
+++ b/src/fns.c	Sun Feb 07 00:32:54 2010 -0600
@@ -3267,7 +3267,7 @@
   enum lrecord_type lisp_vals_type;
 
   assert (LRECORDP (lisp_vals));
-  lisp_vals_type = XRECORD_LHEADER (lisp_vals)->type;
+  lisp_vals_type = (enum lrecord_type) XRECORD_LHEADER (lisp_vals)->type;
 
   args = alloca_array (Lisp_Object, nsequences + 1);
   args[0] = function;