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

Diff of /emacs/src/process.c

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

revision 1.353 by kfstorm, Thu Feb 28 23:59:19 2002 UTC revision 1.354 by kfstorm, Fri Mar 1 21:02:44 2002 UTC
# Line 1837  NON-BLOCKING is optional arg requesting Line 1837  NON-BLOCKING is optional arg requesting
1837    int ret = 0;    int ret = 0;
1838    int xerrno = 0;    int xerrno = 0;
1839    int s = -1, outch, inch;    int s = -1, outch, inch;
1840    struct gcpro gcpro1, gcpro2, gcpro3, gcpro4, gcpro5;    struct gcpro gcpro1, gcpro2, gcpro3, gcpro4, gcpro5, gcpro6;
1841    int retry = 0;    int retry = 0;
1842    int count = specpdl_ptr - specpdl;    int count = specpdl_ptr - specpdl;
1843    int count1;    int count1;
# Line 1859  NON-BLOCKING is optional arg requesting Line 1859  NON-BLOCKING is optional arg requesting
1859  #endif  #endif
1860    
1861    /* Can only GCPRO 5 variables */    /* Can only GCPRO 5 variables */
1862    sentinel = Fcons (sentinel, filter);    GCPRO6 (name, buffer, host, service, sentinel, filter);
   GCPRO5 (name, buffer, host, service, sentinel);  
1863    CHECK_STRING (name);    CHECK_STRING (name);
1864    CHECK_STRING (host);    CHECK_STRING (host);
1865    
# Line 2155  NON-BLOCKING is optional arg requesting Line 2154  NON-BLOCKING is optional arg requesting
2154    XPROCESS (proc)->childp = Fcons (host, Fcons (service, Qnil));    XPROCESS (proc)->childp = Fcons (host, Fcons (service, Qnil));
2155    XPROCESS (proc)->command_channel_p = Qnil;    XPROCESS (proc)->command_channel_p = Qnil;
2156    XPROCESS (proc)->buffer = buffer;    XPROCESS (proc)->buffer = buffer;
2157    XPROCESS (proc)->sentinel = XCAR (sentinel);    XPROCESS (proc)->sentinel = sentinel;
2158    XPROCESS (proc)->filter = XCDR (sentinel);    XPROCESS (proc)->filter = filter;
2159    XPROCESS (proc)->command = Qnil;    XPROCESS (proc)->command = Qnil;
2160    XPROCESS (proc)->pid = Qnil;    XPROCESS (proc)->pid = Qnil;
2161    XSETINT (XPROCESS (proc)->infd, inch);    XSETINT (XPROCESS (proc)->infd, inch);

Legend:
Removed from v.1.353  
changed lines
  Added in v.1.354

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