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

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
line wrap: on
line diff
--- a/src/select-xlike-inc.c	Fri Feb 05 12:11:12 2010 -0600
+++ b/src/select-xlike-inc.c	Fri Feb 05 12:12:28 2010 -0600
@@ -199,9 +199,8 @@
       const Extbyte *extval;
       Bytecount extvallen;
 
-      TO_EXTERNAL_FORMAT (LISP_STRING, obj,
-			  ALLOCA, (extval, extvallen),
-			  (NILP (type) ? Qctext : Qbinary));
+      LISP_STRING_TO_SIZED_EXTERNAL (obj, extval, extvallen,
+				     (NILP (type) ? Qctext : Qbinary));
       *format_ret = 8;
       *size_ret = extvallen;
       *data_ret = xnew_rawbytes (*size_ret);