/[emacs]/emacs/src/fns.c
ViewVC logotype

Diff of /emacs/src/fns.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.365 by kfstorm, Mon Jun 21 21:55:15 2004 UTC revision 1.366 by kfstorm, Mon Jun 21 22:36:02 2004 UTC
# Line 3010  SEQUENCE may be a list, a vector, a bool Line 3010  SEQUENCE may be a list, a vector, a bool
3010    if (nargs < 0) return build_string ("");    if (nargs < 0) return build_string ("");
3011    
3012    nbytes = nargs * sizeof (Lisp_Object);    nbytes = nargs * sizeof (Lisp_Object);
3013    SAFE_ALLOCA (args, Lisp_Object *, nbytes);    SAFE_ALLOCA_LISP (args, nbytes);
3014    
3015    GCPRO1 (separator);    GCPRO1 (separator);
3016    mapcar1 (leni, args, function, sequence);    mapcar1 (leni, args, function, sequence);
# Line 3046  SEQUENCE may be a list, a vector, a bool Line 3046  SEQUENCE may be a list, a vector, a bool
3046    leni = XFASTINT (len);    leni = XFASTINT (len);
3047    
3048    nbytes = leni * sizeof (Lisp_Object);    nbytes = leni * sizeof (Lisp_Object);
3049    SAFE_ALLOCA (args, Lisp_Object *, nbytes);    SAFE_ALLOCA_LISP (args, nbytes);
3050    
3051    mapcar1 (leni, args, function, sequence);    mapcar1 (leni, args, function, sequence);
3052    

Legend:
Removed from v.1.365  
changed lines
  Added in v.1.366

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26