[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/src/fns.c
From: |
Kim F . Storm |
Subject: |
[Emacs-diffs] Changes to emacs/src/fns.c |
Date: |
Mon, 21 Jun 2004 18:35:48 -0400 |
Index: emacs/src/fns.c
diff -c emacs/src/fns.c:1.365 emacs/src/fns.c:1.366
*** emacs/src/fns.c:1.365 Mon Jun 21 21:55:15 2004
--- emacs/src/fns.c Mon Jun 21 22:36:02 2004
***************
*** 3010,3016 ****
if (nargs < 0) return build_string ("");
nbytes = nargs * sizeof (Lisp_Object);
! SAFE_ALLOCA (args, Lisp_Object *, nbytes);
GCPRO1 (separator);
mapcar1 (leni, args, function, sequence);
--- 3010,3016 ----
if (nargs < 0) return build_string ("");
nbytes = nargs * sizeof (Lisp_Object);
! SAFE_ALLOCA_LISP (args, nbytes);
GCPRO1 (separator);
mapcar1 (leni, args, function, sequence);
***************
*** 3046,3052 ****
leni = XFASTINT (len);
nbytes = leni * sizeof (Lisp_Object);
! SAFE_ALLOCA (args, Lisp_Object *, nbytes);
mapcar1 (leni, args, function, sequence);
--- 3046,3052 ----
leni = XFASTINT (len);
nbytes = leni * sizeof (Lisp_Object);
! SAFE_ALLOCA_LISP (args, nbytes);
mapcar1 (leni, args, function, sequence);