[slime-cvs] CVS update: slime/swank-sbcl.lisp

[Helmut Eller]

Update of /project/slime/cvsroot/slime
In directory common-lisp.net:/tmp/cvs-serv16262

Modified Files:
	swank-sbcl.lisp 
Log Message:
(open-listener): Don't make the socket non-blocking.

Date: Sat Dec  6 03:42:54 2003
Author: heller

Index: slime/swank-sbcl.lisp
diff -u slime/swank-sbcl.lisp:1.36 slime/swank-sbcl.lisp:1.37
--- slime/swank-sbcl.lisp:1.36	Sat Dec  6 03:13:14 2003
+++ slime/swank-sbcl.lisp	Sat Dec  6 03:42:54 2003
@@ -67,7 +67,7 @@
 			       :protocol :tcp)))
     (when reuse-address
       (setf (sb-bsd-sockets:sockopt-reuse-address socket) t))
-    (setf (sb-bsd-sockets:non-blocking-mode socket) t)
+    ;;(setf (sb-bsd-sockets:non-blocking-mode socket) t)
     (sb-bsd-sockets:socket-bind socket #(127 0 0 1) port)
     (sb-bsd-sockets:socket-listen socket 5)
     socket))