Mercurial > emacs

changeset 14671:0493e857a13b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(Fopen_network_stream): Set immediate_quit for the connect.
author Richard M. Stallman <rms@gnu.org>
date Mon, 26 Feb 1996 00:07:45 +0000
parents f41775f4f5c6
children 9556c7cfabe4
files src/process.c
diffstat 1 files changed, 8 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/src/process.c	Sun Feb 25 23:00:13 1996 +0000
+++ b/src/process.c	Mon Feb 26 00:07:45 1996 +0000
@@ -1720,11 +1720,17 @@
     unrequest_sigio ();
 
  loop:
+
+  immediate_quit = 1;
+  QUIT;
+
   if (connect (s, (struct sockaddr *) &address, sizeof address) == -1
       && errno != EISCONN)
     {
       int xerrno = errno;
 
+      immediate_quit = 0;
+
       if (errno == EINTR)
 	goto loop;
       if (errno == EADDRINUSE && retry < 20)
@@ -1747,6 +1753,8 @@
 			 Fcons (host, Fcons (name, Qnil)));
     }
 
+  immediate_quit = 0;
+
 #ifdef POLL_FOR_INPUT
   unbind_to (count, Qnil);
 #endif