# HG changeset patch
# User Dave Love <fx@gnu.org>
# Date 1063881587 0
# Node ID 3ea59ac8dfa529ffd8e8ef3b43c75a2c211c371f
# Parent  b2e8d358bdbe93df9350c4bf4dcafed612b38f9d
(Fnetwork_interface_info): Fix type error.
(Fnetwork_interface_list): Doc fix.
(read_process_output, read_process_output): Delete unused var.

diff -r b2e8d358bdbe -r 3ea59ac8dfa5 src/process.c
--- a/src/process.c	Wed Sep 17 21:32:35 2003 +0000
+++ b/src/process.c	Thu Sep 18 10:39:47 2003 +0000
@@ -2449,7 +2449,7 @@
      Lisp_Object process, option, value;
      Lisp_Object no_error;
 {
-  int s, i;
+  int s;
 
   CHECK_PROCESS (process);
 
@@ -3343,7 +3343,7 @@
        doc: /* Return an alist of all network interfaces and their network address.
 Each element is a cons, the car of which is a string containing the
 interface name, and the cdr is the network address in internal
-format; see the description of ADDRESS in 'make-network-process'.  */)
+format; see the description of ADDRESS in `make-network-process'.  */)
      ()
 {
   struct ifconf ifconf;
@@ -3521,7 +3521,7 @@
       any++;
       for (n = 0; n < 6; n++)
 	p->contents[n] = make_number (((unsigned char *)&rq.ifr_hwaddr.sa_data[0])[n]);
-      elt = Fcons (XINT (rq.ifr_hwaddr.sa_family), hwaddr);
+      elt = Fcons (make_number (rq.ifr_hwaddr.sa_family), hwaddr);
     }
 #endif
   res = Fcons (elt, res);
@@ -4607,7 +4607,7 @@
      Lisp_Object proc;
      register int channel;
 {
-  register int nchars, nbytes;
+  register int nbytes;
   char *chars;
   register Lisp_Object outstream;
   register struct buffer *old = current_buffer;