Mercurial > emacs
diff src/callproc.c @ 8555:f1b1537ed3f6
(Fcall_process_region): gcpro filename_string.
| author | Karl Heuer <kwzh@gnu.org> |
|---|---|
| date | Wed, 17 Aug 1994 21:44:49 +0000 |
| parents | 60795e826dad |
| children | 72b312ebaa10 |
line wrap: on
line diff
--- a/src/callproc.c Wed Aug 17 21:42:40 1994 +0000 +++ b/src/callproc.c Wed Aug 17 21:44:49 1994 +0000 @@ -486,7 +486,9 @@ int nargs; register Lisp_Object *args; { - register Lisp_Object filename_string, start, end; + struct gcpro gcpro1; + Lisp_Object filename_string; + register Lisp_Object start, end; #ifdef MSDOS char *tempfile; #else @@ -519,6 +521,7 @@ mktemp (tempfile); filename_string = build_string (tempfile); + GCPRO1 (filename_string); start = args[0]; end = args[1]; #ifdef MSDOS @@ -536,7 +539,7 @@ args[3] = filename_string; - return unbind_to (count, Fcall_process (nargs - 2, args + 2)); + RETURN_UNGCPRO (unbind_to (count, Fcall_process (nargs - 2, args + 2))); } #ifndef VMS /* VMS version is in vmsproc.c. */