[nio-cvs] r102 - branches/home/psmith/restructure/src/io

[psmith at common-lisp.net]

Author: psmith
Date: Wed Feb 28 18:24:31 2007
New Revision: 102

Modified:
   branches/home/psmith/restructure/src/io/nio-server.lisp
Log:
Set outgoing connections to be non-blocking

Modified: branches/home/psmith/restructure/src/io/nio-server.lisp
==============================================================================
--- branches/home/psmith/restructure/src/io/nio-server.lisp	(original)
+++ branches/home/psmith/restructure/src/io/nio-server.lisp	Wed Feb 28 18:24:31 2007
@@ -166,6 +166,7 @@
 		 (update-last-connect-attempt a-node)
 		 (when new-fd
 #+nio-debug	  (format-log t "nio-server:start-server - adding connection to nio thread ~A~%" new-fd)
+                   (set-fd-nonblocking (async-fd-read-fd new-fd))
                    (setf (gethash (async-fd-read-fd new-fd) client-hash) new-fd)
 		   (setf (active-conn a-node) new-fd)
 		   (add-async-fd event-queue new-fd :read-write))))