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

[Luke Gorrie]

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

Modified Files:
	swank-sbcl.lisp 
Log Message:
(accept-connection): Use a character stream to match swank.lisp.

Date: Thu Oct 23 11:52:26 2003
Author: lgorrie

Index: slime/swank-sbcl.lisp
diff -u slime/swank-sbcl.lisp:1.12 slime/swank-sbcl.lisp:1.13
--- slime/swank-sbcl.lisp:1.12	Tue Oct 21 15:36:23 2003
+++ slime/swank-sbcl.lisp	Thu Oct 23 11:52:24 2003
@@ -67,7 +67,7 @@
   "Accept a SWANK TCP connection on SOCKET."
   (let* ((socket (sb-bsd-sockets:socket-accept server-socket))
 	 (stream (sb-bsd-sockets:socket-make-stream 
-		  socket :input t :output t :element-type 'unsigned-byte)))
+		  socket :input t :output t :element-type 'base-char)))
     (sb-sys:add-fd-handler 
      (sb-bsd-sockets:socket-file-descriptor socket)
      :input (lambda (fd)