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

[Helmut Eller]

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

Modified Files:
	swank-sbcl.lisp 
Log Message:
(make-fn-streams): Deleted.  Already defined in swank-gray.lisp.
Date: Sun Jan 18 02:59:00 2004
Author: heller

Index: slime/swank-sbcl.lisp
diff -u slime/swank-sbcl.lisp:1.52 slime/swank-sbcl.lisp:1.53
--- slime/swank-sbcl.lisp:1.52	Sun Jan 18 02:15:49 2004
+++ slime/swank-sbcl.lisp	Sun Jan 18 02:59:00 2004
@@ -106,14 +106,6 @@
             (return (sb-bsd-sockets:socket-accept socket))
           (sb-bsd-sockets:interrupted-error ()))))
 
-(defmethod make-fn-streams (input-fn output-fn)
-  (let* ((output (make-instance 'slime-output-stream
-                                :output-fn output-fn))
-         (input  (make-instance 'slime-input-stream
-                                :input-fn input-fn
-                                :output-stream output)))
-    (values input output)))
-
 (defmethod call-without-interrupts (fn)
   (sb-sys:without-interrupts (funcall fn)))