(Fopen_network_stream): Sleep 1 sec before connect retry.

4590788a · Richard M. Stallman · a9db66a4 · 4590788a
Commit 4590788a authored Jun 25, 1995 by Richard M. Stallman
Hide whitespace changes
Inline Side-by-side

Showing with 4 additions and 0 deletions

src/process.c src/process.c +4 -0

No files found.
--- a/src/process.c
+++ b/src/process.c
@@ -1658,6 +1658,10 @@ Fourth arg SERVICE is name of the service desired, or an integer\n\
 	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;
 	}