(Fformat_network_address): Removed unused locals p, cp, and i.

1 files changed, 0 insertions, 4 deletions

diff --git a/src/process.c b/src/process.c
index 83b25928a55..13395389d83 100644
--- a/src/process.c
+++ b/src/process.c
@@ -1059,10 +1059,6 @@ Returns nil if format of ADDRESS is invalid.  */)
      (address)
      Lisp_Object address;
 {
-  register struct Lisp_Vector *p;
-  register unsigned char *cp;
-  register int i;
-
   if (NILP (address))
     return Qnil;