register Lisp_Object temp;
/* Make sure point-max won't overflow after this insertion. */
- XSET (temp, Lisp_Int, length + Z);
+ XSETINT (temp, length + Z);
if (length + Z != XINT (temp))
error ("maximum buffer size exceeded");
struct gcpro gcpro1;
/* Make sure point-max won't overflow after this insertion. */
- XSET (temp, Lisp_Int, length + Z);
+ XSETINT (temp, length + Z);
if (length + Z != XINT (temp))
error ("maximum buffer size exceeded");