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

[Helmut Eller]

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

Modified Files:
	swank-abcl.lisp 
Log Message:
(emacs-connected): Ignore the stream argument.

Date: Wed Jun 16 15:04:56 2004
Author: heller

Index: slime/swank-abcl.lisp
diff -u slime/swank-abcl.lisp:1.2 slime/swank-abcl.lisp:1.3
--- slime/swank-abcl.lisp:1.2	Wed Jun 16 12:39:06 2004
+++ slime/swank-abcl.lisp	Wed Jun 16 15:04:56 2004
@@ -55,10 +55,9 @@
 
 (defimplementation accept-connection (socket)
   (ext:get-socket-stream (ext:socket-accept socket)))
-  
-  
 
-(defimplementation emacs-connected ())
+(defimplementation emacs-connected (stream)
+  (declare (ignore stream)))
 
 ;;;; Unix signals