comparison src/fns.c @ 4999:ebafcd6e9f4b

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.
author Ben Wing <ben@xemacs.org>
date Sun, 07 Feb 2010 00:32:54 -0600
parents b46c89ccbed3
children 714d854d00e9
comparison
equal deleted inserted replaced
4998:b46c89ccbed3 4999:ebafcd6e9f4b
3265 struct gcpro gcpro1, gcpro2; 3265 struct gcpro gcpro1, gcpro2;
3266 int i, j; 3266 int i, j;
3267 enum lrecord_type lisp_vals_type; 3267 enum lrecord_type lisp_vals_type;
3268 3268
3269 assert (LRECORDP (lisp_vals)); 3269 assert (LRECORDP (lisp_vals));
3270 lisp_vals_type = XRECORD_LHEADER (lisp_vals)->type; 3270 lisp_vals_type = (enum lrecord_type) XRECORD_LHEADER (lisp_vals)->type;
3271 3271
3272 args = alloca_array (Lisp_Object, nsequences + 1); 3272 args = alloca_array (Lisp_Object, nsequences + 1);
3273 args[0] = function; 3273 args[0] = function;
3274 for (i = 1; i <= nsequences; ++i) 3274 for (i = 1; i <= nsequences; ++i)
3275 { 3275 {