# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 804106645 0
# Node ID 3171d5da8a86477f8c1431a754f3fbccd876c0c0
# Parent  3cd65cb4c643e862b684412fb20325c3e6d56e77
(Fopen_network_stream): Sleep 1 sec before connect retry.

diff -r 3cd65cb4c643 -r 3171d5da8a86 src/process.c
--- a/src/process.c	Sun Jun 25 03:06:56 1995 +0000
+++ b/src/process.c	Sun Jun 25 18:57:25 1995 +0000
@@ -1658,6 +1658,10 @@
 	goto loop;
       if (errno == EADDRINUSE && retry < 20)
 	{
+	  /* A delay here is needed on some FreeBSD systems,
+	     and it is harmless, since this retrying takes time anyway
+	     and should be infrequent.  */
+	  Fsleep_for (make_number (1), Qnil);
 	  retry++;
 	  goto loop;
 	}