/[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.373 by raeburn, Mon May 20 08:06:32 2002 UTC revision 1.374 by lektu, Thu Jul 11 14:14:34 2002 UTC
# Line 1292  usage: (start-process NAME BUFFER PROGRA Line 1292  usage: (start-process NAME BUFFER PROGRA
1292    register unsigned char **new_argv;    register unsigned char **new_argv;
1293  #endif  #endif
1294    register int i;    register int i;
1295    int count = specpdl_ptr - specpdl;    int count = SPECPDL_INDEX ();
1296    
1297    buffer = args[1];    buffer = args[1];
1298    if (!NILP (buffer))    if (!NILP (buffer))
# Line 2552  usage: (make-network-process &rest ARGS) Line 2552  usage: (make-network-process &rest ARGS)
2552    int s = -1, outch, inch;    int s = -1, outch, inch;
2553    struct gcpro gcpro1;    struct gcpro gcpro1;
2554    int retry = 0;    int retry = 0;
2555    int count = specpdl_ptr - specpdl;    int count = SPECPDL_INDEX ();
2556    int count1;    int count1;
2557    Lisp_Object QCaddress;  /* one of QClocal or QCremote */    Lisp_Object QCaddress;  /* one of QClocal or QCremote */
2558    Lisp_Object tem;    Lisp_Object tem;
# Line 2843  usage: (make-network-process &rest ARGS) Line 2843  usage: (make-network-process &rest ARGS)
2843      }      }
2844    
2845    /* Do this in case we never enter the for-loop below.  */    /* Do this in case we never enter the for-loop below.  */
2846    count1 = specpdl_ptr - specpdl;    count1 = SPECPDL_INDEX ();
2847    s = -1;    s = -1;
2848    
2849    for (lres = res; lres; lres = lres->ai_next)    for (lres = res; lres; lres = lres->ai_next)
# Line 4348  read_process_output (proc, channel) Line 4348  read_process_output (proc, channel)
4348        /* We inhibit quit here instead of just catching it so that        /* We inhibit quit here instead of just catching it so that
4349           hitting ^G when a filter happens to be running won't screw           hitting ^G when a filter happens to be running won't screw
4350           it up.  */           it up.  */
4351        int count = specpdl_ptr - specpdl;        int count = SPECPDL_INDEX ();
4352        Lisp_Object odeactivate;        Lisp_Object odeactivate;
4353        Lisp_Object obuffer, okeymap;        Lisp_Object obuffer, okeymap;
4354        Lisp_Object text;        Lisp_Object text;
# Line 5734  exec_sentinel (proc, reason) Line 5734  exec_sentinel (proc, reason)
5734  {  {
5735    Lisp_Object sentinel, obuffer, odeactivate, okeymap;    Lisp_Object sentinel, obuffer, odeactivate, okeymap;
5736    register struct Lisp_Process *p = XPROCESS (proc);    register struct Lisp_Process *p = XPROCESS (proc);
5737    int count = specpdl_ptr - specpdl;    int count = SPECPDL_INDEX ();
5738    int outer_running_asynch_code = running_asynch_code;    int outer_running_asynch_code = running_asynch_code;
5739    int waiting = waiting_for_user_input_p;    int waiting = waiting_for_user_input_p;
5740    

Legend:
Removed from v.1.373  
changed lines
  Added in v.1.374

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