[Emacs-diffs] Changes to emacs/src/fns.c

[Kim F . Storm]

Index: emacs/src/fns.c
diff -c emacs/src/fns.c:1.368 emacs/src/fns.c:1.369
*** emacs/src/fns.c:1.368       Tue Jun 22 14:48:10 2004
--- emacs/src/fns.c     Thu Jun 24 22:03:10 2004
***************
*** 3020,3030 ****
    for (i = 1; i < nargs; i += 2)
      args[i] = separator;
  
-   GCPRO1 (*args);
-   gcpro1.nvars = nargs;
    ret = Fconcat (nargs, args);
-   UNGCPRO;
- 
    SAFE_FREE_LISP (nargs);
  
    return ret;
--- 3020,3026 ----
***************
*** 3040,3046 ****
    register Lisp_Object len;
    register int leni;
    register Lisp_Object *args;
-   struct gcpro gcpro1;
    Lisp_Object ret;
    USE_SAFE_ALLOCA;
  
--- 3036,3041 ----
***************
*** 3051,3061 ****
  
    mapcar1 (leni, args, function, sequence);
  
-   GCPRO1 (*args);
-   gcpro1.nvars = leni;
    ret = Flist (leni, args);
-   UNGCPRO;
- 
    SAFE_FREE_LISP (leni);
  
    return ret;
--- 3046,3052 ----