/[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.412 by kfstorm, Wed Sep 17 21:31:53 2003 UTC revision 1.413 by fx, Thu Sep 18 10:39:47 2003 UTC
# Line 2449  OPTION is not a supported option, return Line 2449  OPTION is not a supported option, return
2449       Lisp_Object process, option, value;       Lisp_Object process, option, value;
2450       Lisp_Object no_error;       Lisp_Object no_error;
2451  {  {
2452    int s, i;    int s;
2453    
2454    CHECK_PROCESS (process);    CHECK_PROCESS (process);
2455    
# Line 3343  DEFUN ("network-interface-list", Fnetwor Line 3343  DEFUN ("network-interface-list", Fnetwor
3343         doc: /* Return an alist of all network interfaces and their network address.         doc: /* Return an alist of all network interfaces and their network address.
3344  Each element is a cons, the car of which is a string containing the  Each element is a cons, the car of which is a string containing the
3345  interface name, and the cdr is the network address in internal  interface name, and the cdr is the network address in internal
3346  format; see the description of ADDRESS in 'make-network-process'.  */)  format; see the description of ADDRESS in `make-network-process'.  */)
3347       ()       ()
3348  {  {
3349    struct ifconf ifconf;    struct ifconf ifconf;
# Line 3521  FLAGS is the current flags of the interf Line 3521  FLAGS is the current flags of the interf
3521        any++;        any++;
3522        for (n = 0; n < 6; n++)        for (n = 0; n < 6; n++)
3523          p->contents[n] = make_number (((unsigned char *)&rq.ifr_hwaddr.sa_data[0])[n]);          p->contents[n] = make_number (((unsigned char *)&rq.ifr_hwaddr.sa_data[0])[n]);
3524        elt = Fcons (XINT (rq.ifr_hwaddr.sa_family), hwaddr);        elt = Fcons (make_number (rq.ifr_hwaddr.sa_family), hwaddr);
3525      }      }
3526  #endif  #endif
3527    res = Fcons (elt, res);    res = Fcons (elt, res);
# Line 4607  read_process_output (proc, channel) Line 4607  read_process_output (proc, channel)
4607       Lisp_Object proc;       Lisp_Object proc;
4608       register int channel;       register int channel;
4609  {  {
4610    register int nchars, nbytes;    register int nbytes;
4611    char *chars;    char *chars;
4612    register Lisp_Object outstream;    register Lisp_Object outstream;
4613    register struct buffer *old = current_buffer;    register struct buffer *old = current_buffer;

Legend:
Removed from v.1.412  
changed lines
  Added in v.1.413

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