[Ecls-list] ECL HEAD + Slime HEAD

[Juan Jose Garcia-Ripoll]

On Tue, Feb 16, 2010 at 9:32 PM, Tobias C. Rittweiler <tcr at freebits.de> wrote:
>  (while (slime-connected-p)
>    (slime-restart-inferior-lisp)
>    (while (not (slime-connected-p)) (sit-for 0.2))
>    (sit-for 0.3))

I am unable to run this from Emacs: it just performs 1 connection and
stops. When I repeat the process manually, it works, no crashes when
using a single-threaded ECL + serve-event after a minor change
Index: swank-ecl.lisp
===================================================================
RCS file: /project/slime/cvsroot/slime/swank-ecl.lisp,v
retrieving revision 1.52
diff -u -r1.52 swank-ecl.lisp
--- swank-ecl.lisp	16 Feb 2010 11:08:01 -0000	1.52
+++ swank-ecl.lisp	17 Feb 2010 22:39:37 -0000
@@ -137,6 +137,7 @@
 (defun socket-fd (socket)
   (etypecase socket
     (fixnum socket)
+    (two-way-stream (socket-fd (two-way-stream-input-stream socket)))
     (sb-bsd-sockets:socket (sb-bsd-sockets:socket-file-descriptor socket))
     (file-stream (si:file-stream-fd socket))))

This is nice.

However, the multithreaded version does not work yet. I have disabled
several errors by deactivating the grovel-... function, but still get
problems in CLOS functions and corrupt data.

Juanjo

-- 
Instituto de Física Fundamental, CSIC
c/ Serrano, 113b, Madrid 28006 (Spain)
http://juanjose.garciaripoll.googlepages.com