Mercurial > hg > xemacs-beta

comparison src/select-xlike-inc.c @ 4985:358aa3bb603f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Automatic merge
author Ben Wing <ben@xemacs.org>
date Fri, 05 Feb 2010 12:12:28 -0600
parents src/select-common.h@4aebb0131297 src/select-common.h@f23cd0184dcf
children 308d34e9f07d
comparison
equal deleted inserted replaced
4984:f23cd0184dcf 4985:358aa3bb603f
197 else if (STRINGP (obj)) 197 else if (STRINGP (obj))
198 { 198 {
199 const Extbyte *extval; 199 const Extbyte *extval;
200 Bytecount extvallen; 200 Bytecount extvallen;
201 201
202 TO_EXTERNAL_FORMAT (LISP_STRING, obj, 202 LISP_STRING_TO_SIZED_EXTERNAL (obj, extval, extvallen,
203 ALLOCA, (extval, extvallen), 203 (NILP (type) ? Qctext : Qbinary));
204 (NILP (type) ? Qctext : Qbinary));
205 *format_ret = 8; 204 *format_ret = 8;
206 *size_ret = extvallen; 205 *size_ret = extvallen;
207 *data_ret = xnew_rawbytes (*size_ret); 206 *data_ret = xnew_rawbytes (*size_ret);
208 memcpy (*data_ret, extval, *size_ret); 207 memcpy (*data_ret, extval, *size_ret);
209 #ifdef MULE 208 #ifdef MULE