Mercurial > emacs
changeset 15895:85112cca0b22
(send_process): GCPRO object.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Thu, 22 Aug 1996 02:57:09 +0000 |
| parents | efd2835a7c96 |
| children | 3a3c30116313 |
| files | src/process.c |
| diffstat | 1 files changed, 5 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/src/process.c Wed Aug 21 20:36:30 1996 +0000 +++ b/src/process.c Thu Aug 22 02:57:09 1996 +0000 @@ -2645,6 +2645,9 @@ /* Use volatile to protect variables from being clobbered by longjmp. */ int rv; volatile unsigned char *procname = XSTRING (XPROCESS (proc)->name)->data; + struct gcpro gcpro1; + + GCPRO1 (object); #ifdef VMS struct Lisp_Process *p = XPROCESS (proc); @@ -2783,6 +2786,8 @@ error ("SIGPIPE raised on process %s; closed it", procname); #endif } + + UNGCPRO; } DEFUN ("process-send-region", Fprocess_send_region, Sprocess_send_region,