January 2009 - slime-devel - mailman3.common-lisp.net

[slime-devel] Problems Using SLIME on Windows XP
by Karl Winterling 02 Jan '09

02 Jan '09

When I do M-x slime-connect, I get an error in the SLIME debugger. I use a CLISP 2.45 pre-compiled binary on Windows XP SP3. Here is the error and backtrace: Winsock error 10038 (ENOTSOCK): Socket operation on non-socket [Condition of type SYSTEM::SIMPLE-OS-ERROR] Restarts: 0: [SOCKET-STATUS] Return from socket-status. 1: [ABORT] Abort 2: [CLOSE-CONNECTION] Close SLIME connection 3: [ABORT] Abort main loop Backtrace: 0: [292] frame binding variables (~ = dynamically): | ~ SWANK::*SWANK-STATE-STACK* <--> NIL 1: [289] frame binding variables (~ = dynamically): | ~ SWANK::*SLDB-STEPPING-P* <--> NIL 2: [286] frame binding variables (~ = dynamically): | ~ SWANK::*SLDB-LEVEL* <--> 0 3: [283] frame binding variables (~ = dynamically): | ~ *PACKAGE* <--> #<PACKAGE COMMON-LISP-USER> 4: <1/276> #<COMPILED-FUNCTION SWANK::DEBUG-IN-EMACS> - #<COMPILED-FUNCTION SWANK::INVOKE-SLIME-DEBUGGER-1> 5: <1/274> #<COMPILED-FUNCTION SWANK::INVOKE-SLIME-DEBUGGER-1> - #<COMPILED-FUNCTION SWANK::INVOKE-SLIME-DEBUGGER-1> 6: [273] frame binding variables (~ = dynamically): | ~ *DEBUGGER-HOOK* <--> #<COMPILED-FUNCTION SWANK:SWANK-DEBUGGER-HOOK> 7: <1/269> #<COMPILED-FUNCTION #:|625 630 (DEFINTERFACE CALL-WITH-DEBUGGER-HOOK (HOOK FUN) ...)-61-3-1|> - #<COMPILED-FUNCTION #:|625 630 (DEFINTERFACE CALL-WITH-DEBUGGER-HOOK (HOOK FUN) ...)-61-3-1|> 8: <1/264> #<COMPILED-FUNCTION SWANK-BACKEND:CALL-WITH-DEBUGGER-HOOK> - #<COMPILED-FUNCTION SWANK::CALL-WITH-CONNECTION-2-2-1> 9: <1/261> #<COMPILED-FUNCTION SWANK::CALL-WITH-CONNECTION-2-2-1> - #<COMPILED-FUNCTION SWANK::CALL-WITH-CONNECTION-2-2-1> 10: [260] frame binding variables (~ = dynamically): 11: <1/255> #<COMPILED-FUNCTION SWANK::CALL-WITH-BINDINGS> - #<COMPILED-FUNCTION SWANK::CALL-WITH-CONNECTION-2-2> 12: <1/252> #<COMPILED-FUNCTION SWANK::CALL-WITH-CONNECTION-2-2> - #<COMPILED-FUNCTION SWANK::CALL-WITH-CONNECTION-2-2> 13: [251] handler frame for conditions SWANK::SWANK-ERROR 14: <1/244> #<COMPILED-FUNCTION SWANK::CALL-WITH-CONNECTION-2> - #<COMPILED-FUNCTION SWANK::CALL-WITH-CONNECTION-2> 15: [243] handler frame for conditions SWANK::SWANK-ERROR 16: [237] compiled tagbody frame for #(NIL) 17: [231] frame binding variables (~ = dynamically): | ~ SWANK::*SLIME-INTERRUPTS-ENABLED* <--> NIL 18: [227] frame binding variables (~ = dynamically): | ~ SWANK-BACKEND:*PENDING-SLIME-INTERRUPTS* <--> #<UNBOUND> 19: [224] frame binding variables (~ = dynamically): | ~ SWANK::*EMACS-CONNECTION* <--> NIL 20: <1/219> #<COMPILED-FUNCTION SWANK::CALL-WITH-CONNECTION> [217] frame binding variables (~ = dynamically): | ~ SWANK::*SLIME-INTERRUPTS-ENABLED* <--> #<UNBOUND> 21: <1/211> #<COMPILED-FUNCTION SWANK:INVOKE-SLIME-DEBUGGER> - #<COMPILED-FUNCTION SWANK::SWANK-DEBUGGER-HOOK-2-1> 22: <1/209> #<COMPILED-FUNCTION SWANK::SWANK-DEBUGGER-HOOK-2-1> - #<COMPILED-FUNCTION SWANK::SWANK-DEBUGGER-HOOK-2-1> 23: [208] frame binding variables (~ = dynamically): | ~ *DEBUGGER-HOOK* <--> NIL 24: <1/204> #<COMPILED-FUNCTION #:|625 630 (DEFINTERFACE CALL-WITH-DEBUGGER-HOOK (HOOK FUN) ...)-61-3-1|> - #<COMPILED-FUNCTION #:|625 630 (DEFINTERFACE CALL-WITH-DEBUGGER-HOOK (HOOK FUN) ...)-61-3-1|> 25: <1/199> #<COMPILED-FUNCTION SWANK-BACKEND:CALL-WITH-DEBUGGER-HOOK> - #<COMPILED-FUNCTION SWANK::SWANK-DEBUGGER-HOOK-2> 26: <1/196> #<COMPILED-FUNCTION SWANK::SWANK-DEBUGGER-HOOK-2> - #<COMPILED-FUNCTION SWANK::SWANK-DEBUGGER-HOOK-2> 27: [195] handler frame for conditions SWANK::INVOKE-DEFAULT-DEBUGGER 28: [189] compiled tagbody frame for #(NIL) 29: <1/183> #<COMPILED-FUNCTION SWANK:SWANK-DEBUGGER-HOOK> [181] frame binding variables (~ = dynamically): | ~ *DEBUGGER-HOOK* <--> #<COMPILED-FUNCTION SWANK:SWANK-DEBUGGER-HOOK> 30: <1/178> #<SYSTEM-FUNCTION INVOKE-DEBUGGER> 1 [177] frame binding variables (~ = dynamically): | ~ SYSTEM::*PRIN-STREAM* <--> #<UNBOUND> 31: [174] frame binding variables (~ = dynamically): | ~ *PRINT-READABLY* <--> NIL 32: [171] frame binding variables (~ = dynamically): | ~ *PRINT-ESCAPE* <--> T 33: <1/167> #<SYSTEM-FUNCTION SOCKET-STATUS> 3 [164] frame binding variables (~ = dynamically): | ~ SYSTEM::*ACTIVE-RESTARTS* <--> (#S(RESTART :NAME ABORT :TEST #1=#<COMPILED-FUNCTION SYSTEM::DEFAULT-R.. 34: [161] catch frame for tag #:SIMPLE-RESTART-19728 35: <1/156> #<COMPILED-FUNCTION #:|180 194 (DEFIMPLEMENTATION WAIT-FOR-INPUT (STREAMS &OPTIONAL TIMEOUT) ...)-16-1-1|> - #<COMPILED-FUNCTION #:|180 194 (DEFIMPLEMENTATION WAIT-FOR-INPUT (STREAMS &OPTIONAL.. 36: <1/151> #<COMPILED-FUNCTION SWANK-BACKEND:WAIT-FOR-INPUT> - (#<IO UNBUFFERED SOCKET-STREAM CHARACTER 0.0.0.0:4005> #<IO TERMINAL-STREAM>) 37: <1/146> #<COMPILED-FUNCTION SWANK::MAKE-REPL-INPUT-STREAM-1> - #<COMPILED-FUNCTION SWANK::MAKE-REPL-INPUT-STREAM-1> 38: <1/143> #<COMPILED-FUNCTION #:|84 97 (DEFMETHOD STREAM-READ-CHAR (#) ...)-12-1-1-1|> - #<COMPILED-FUNCTION #:|84 97 (DEFMETHOD STREAM-READ-CHAR (#) ...)-12-1-1-1|> 39: <1/141> #<COMPILED-FUNCTION #:|1004 1008 (DEFINTERFACE CALL-WITH-LOCK-HELD (LOCK FUNCTION) ...)-121-3-1|> - #<COMPILED-FUNCTION #:|1004 1008 (DEFINTERFACE CALL-WITH-LOCK-HELD (LOCK FUNCTION) ...)-121-.. 40: <1/136> #<COMPILED-FUNCTION SWANK-BACKEND:CALL-WITH-LOCK-HELD> [134] compiled block frame for STREAM-READ-CHAR 41: <1/129> #<COMPILED-FUNCTION #:|84 97 (DEFMETHOD STREAM-READ-CHAR (#) ...)-12-1-1|> <2/129> #<STANDARD-GENERIC-FUNCTION STREAM-READ-CHAR> - #<SWANK-BACKEND::SLIME-INPUT-STREAM #x19F815AD> 42: [127] frame binding variables (~ = dynamically): | ~ SYSTEM::*READING-STRUCT* <--> NIL 43: [124] frame binding variables (~ = dynamically): | ~ SYSTEM::*READING-ARRAY* <--> NIL 44: [121] frame binding variables (~ = dynamically): | ~ SYSTEM::*BACKQUOTE-LEVEL* <--> #<UNBOUND> 45: [118] frame binding variables (~ = dynamically): | ~ SYSTEM::*READ-REFERENCE-TABLE* <--> #<UNBOUND> 46: [115] frame binding variables (~ = dynamically): | ~ SYSTEM::*READ-PRESERVE-WHITESPACE* <--> #<UNBOUND> 47: [112] frame binding variables (~ = dynamically): | ~ SYSTEM::*READ-RECURSIVE-P* <--> #<UNBOUND> 48: <1/109> #<SYSTEM-FUNCTION READ> [105] frame binding variables (~ = dynamically): | ~ SYSTEM::*ACTIVE-RESTARTS* <--> (#S(RESTART :NAME SWANK::CLOSE-CONNECTION :TEST #1=#<COMPILED-FUNCTION SYSTEM::DE.. 49: [102] catch frame for tag #:SIMPLE-RESTART-23703 50: <1/98> #<COMPILED-FUNCTION SWANK::SIMPLE-REPL> [98] frame binding variables (~ = dynamically): | ~ *STANDARD-INPUT* <--> #<IO SYNONYM-STREAM *TERMINAL-IO*> 51: [94] frame binding variables (~ = dynamically): | ~ SYSTEM::*ACTIVE-RESTARTS* <--> (#S(RESTART :NAME ABORT :TEST #<COMPILED-FUNCTION SYSTEM::DEFAULT-RESTART-TEST> :INVOKE-TAG NIL :INVOKE-FUNCTION #.. 52: [91] catch frame for tag #:SIMPLE-RESTART-23688 53: <1/87> #<COMPILED-FUNCTION SWANK::SIMPLE-SERVE-REQUESTS-2> - #<COMPILED-FUNCTION SWANK::SIMPLE-SERVE-REQUESTS-2> 54: <1/85> #<COMPILED-FUNCTION #:|102 110 (DEFIMPLEMENTATION CALL-WITH-USER-BREAK-HANDLER (HANDLER FUNCTION) ...)-7-1-1-2|> - #<COMPILED-FUNCTION #:|102 110 (DEFIMPLEMENTATION CALL-WITH-USER-BREAK-HANDLER.. 55: [84] handler frame for conditions SYSTEM::SIMPLE-INTERRUPT-CONDITION 56: <1/76> #<COMPILED-FUNCTION #:|102 110 (DEFIMPLEMENTATION CALL-WITH-USER-BREAK-HANDLER (HANDLER FUNCTION) ...)-7-1-1|> - #<COMPILED-FUNCTION #:|102 110 (DEFIMPLEMENTATION CALL-WITH-USER-BREAK-HANDLER (.. 57: <1/71> #<COMPILED-FUNCTION SWANK-BACKEND:CALL-WITH-USER-BREAK-HANDLER> [69] unwind-protect frame 58: <1/65> #<COMPILED-FUNCTION SWANK::SIMPLE-SERVE-REQUESTS> - #<COMPILED-FUNCTION SWANK::SIMPLE-SERVE-REQUESTS> 59: <1/62> #<COMPILED-FUNCTION SWANK::SERVE-REQUESTS> - #<SWANK::CONNECTION #x19F8146D> 60: [59] unwind-protect frame 61: <1/55> #<COMPILED-FUNCTION SWANK::SERVE-CONNECTION> - #<COMPILED-FUNCTION SWANK::SETUP-SERVER-SERVE> 62: <1/50> #<COMPILED-FUNCTION SWANK::SETUP-SERVER-SERVE> - NIL 63: <1/44> #<COMPILED-FUNCTION SWANK::SETUP-SERVER> - #<COMPILED-FUNCTION SWANK:CREATE-SERVER> 64: <1/38> #<COMPILED-FUNCTION SWANK:CREATE-SERVER> - #<COMPILED-FUNCTION SWANK:CREATE-SERVER> 65: [33] EVAL frame for form (SWANK:CREATE-SERVER) 66: <1/30> #<SYSTEM-FUNCTION SYSTEM::READ-EVAL-PRINT> 2 [28] frame binding variables (~ = dynamically): | ~ SYSTEM::*ACTIVE-RESTARTS* <--> NIL 67: [25] compiled tagbody frame for #(NIL) 68: [20] catch frame for tag DEBUG

3 3

Re: [slime-devel] starting with a saved image
by PORTELA Mariano 02 Jan '09

02 Jan '09

Hi everyone! First Happy New Year!! I want to be removed from this list. How can i do that? -----Mensaje original----- De: Volkan YAZICI [mailto:yazicivo@ttmail.com] Enviado el: jueves, 01 de enero de 2009 14:30 Para: Tamas K Papp CC: slime-devel(a)common-lisp.net Asunto: Re: [slime-devel] starting with a saved image On Thu, 1 Jan 2009, Tamas K Papp <tkpapp(a)gmail.com> writes: > I would like to start sbcl as an inferior-lisp with slime and load a > previously saved image (saved with sb-ext:save-lisp-and-die). How can > I do this? I just want to do this occasionally, not all the time, and > the path of the image is not fixed (I use many images), so I need to > be able to enter that interactively. You can introduce lisp images with different names to SLIME-LISP-IMPLEMENTATIONS and start them via "M-- M-x slime RET lisp-image-name RET". Regards. _______________________________________________ slime-devel site list slime-devel(a)common-lisp.net http://common-lisp.net/mailman/listinfo/slime-devel

2 1

[slime-devel] starting with a saved image
by Tamas K Papp 02 Jan '09

02 Jan '09

Hi, I would like to start sbcl as an inferior-lisp with slime and load a previously saved image (saved with sb-ext:save-lisp-and-die). How can I do this? I just want to do this occasionally, not all the time, and the path of the image is not fixed (I use many images), so I need to be able to enter that interactively. Thanks, Tamas

3 2

[slime-devel] SBCL with globally redirected IO
by Gábor Melis 02 Jan '09

02 Jan '09

With current HEAD I cannot start sbcl if *globally-redirect-io* is T. Same as: http://paste.lisp.org/display/72603 With slime from Dec 22 it works fine. Cheers, G

2 1

[slime-devel] Daily ChangeLog diff
by Helmut Eller 02 Jan '09

02 Jan '09

Index: slime/ChangeLog diff -u slime/ChangeLog:1.1615 slime/ChangeLog:1.1619 --- slime/ChangeLog:1.1615 Wed Dec 31 11:25:46 2008 +++ slime/ChangeLog Thu Jan 1 16:08:53 2009 @@ -1,3 +1,35 @@ +2009-01-01 Tobias C. Rittweiler <tcr(a)freebits.de> + + * slime.el (slime-eval-async, slime-dispatch-event): Canoncalize + return value. Previously they returned an arbitrary value which + was displayed to the minibuffer due to a bug in slime-autodoc. The + arbitrariness of the return value made debugging this a chore. + +2009-01-01 Helmut Eller <heller(a)common-lisp.net> + + * swank-openmcl.lisp (frame-source-location-for-emacs) + (pc-source-location): Fall back to the source-note of the function + if there is no source-note for a pc offset. + +2009-01-01 Helmut Eller <heller(a)common-lisp.net> + + For buffers without filename, map the name of the tempfile back to + the buffer name. + + * swank-openmcl.lisp (*temp-file-map*): New variable. + (note-temp-file): New function. + (compile-temp-file, source-note-to-source-location): Use it. + +2009-01-01 Helmut Eller <heller(a)common-lisp.net> + + * swank.lisp (sleep-for): New function + * slime.el ([test] break): Use SWANK::SLEEP-FOR to help CCL pass + this test. + ([test] arglist): Update arglist of + swank::compile-string-for-emacs. + ([rest] find-definition.2): Allow some whitespace before the actual + position. Otherwise, CCL would fail on this test. + 2008-12-31 Helmut Eller <heller(a)common-lisp.net> * swank.lisp (maybe-redirect-global-io): Don't consider Index: slime/contrib/ChangeLog diff -u slime/contrib/ChangeLog:1.160 slime/contrib/ChangeLog:1.161 --- slime/contrib/ChangeLog:1.160 Wed Dec 31 16:55:26 2008 +++ slime/contrib/ChangeLog Thu Jan 1 15:54:30 2009 @@ -1,3 +1,8 @@ +2009-01-01 Tobias C. Rittweiler <tcr(a)freebits.de> + + * slime-autodoc.el: Autodoc is now implemented on top of ElDoc. + (Suggested by Madhu.) + 2008-12-31 Tobias C. Rittweiler <tcr(a)freebits.de> * swank-arglists.lisp (format-arglist-for-echo-area): Catch errors

1 0

[slime-devel] hacking system internals from Slime
by Nikodemus Siivola 01 Jan '09

01 Jan '09

Here's a workflow issue that I run into periodically: 1. While working on SBCL I instrument some internal operation to see what is going on -- let's say with BREAK. 2. Before I can run my test-case I need to page my way thru a number of debugger entries (sometimes a HUGE number) due to eg. cursor movement in a Lisp buffer causing the instrumented operation to be used. I'm not looking for a 100% solution, because I doubt anything like that exists. Hacking a live system is always tricky that way... An 80% solution might be being able to tell Slime to stop talking to the lisp, except for communications triggered by explicit REPL evaluations. Does this sound like a feasible idea? Any other suggestions? Cheers, -- Nikodemus

4 7

[slime-devel] slime-call-defun and package nicknames
by Stas Boukarev 01 Jan '09

01 Jan '09

slime-call-defun treats package nicknames as different packages and inserts fully qualified symbol names. -- With Best Regards, Stas.

1 0

[slime-devel] Daily ChangeLog diff
by Helmut Eller 01 Jan '09

01 Jan '09

Index: slime/ChangeLog diff -u slime/ChangeLog:1.1610 slime/ChangeLog:1.1615 --- slime/ChangeLog:1.1610 Tue Dec 30 18:57:54 2008 +++ slime/ChangeLog Wed Dec 31 11:25:46 2008 @@ -1,3 +1,37 @@ +2008-12-31 Helmut Eller <heller(a)common-lisp.net> + + * swank.lisp (maybe-redirect-global-io): Don't consider + connections without streams. + (*new-connection-hook*): Don't add MAYBE-REDIRECT-GLOBAL-IO. + (create-repl): Call MAYBE-REDIRECT-GLOBAL-IO here. + +2008-12-31 Helmut Eller <heller(a)common-lisp.net> + + * swank-openmcl.lisp ([method] source-locations (symbol)): Drop + the unused _; the compiler dosn't like it. + +2008-12-31 Helmut Eller <heller(a)common-lisp.net> + + * swank-openmcl.lisp ([method] source-locations (symbol)): + + * slime.el (slime-cd, slime-pwd): New commands. + (slime-change-directory): New function. + (slime-change-directory-hooks): New hook. + +2008-12-31 Helmut Eller <heller(a)common-lisp.net> + + * slime.el ([test] find-definition.2): Also fails for Lispworks. + ([test] interrupt-at-toplevel, [test] interrupt-in-debugger): Those + don't work well if there's no REPL thread. + + * swank-backend.lisp (wait-for-input, wait-for-one-stream): Don't + use PEEK-CHAR because we can't interrupt that cleanly. + * swank.lisp (simple-serve-requests): Run the REPL inside + WITH-CONNECTION. + * swank-lispworks.lisp (emacs-connected): Don't install the signal + handler here ... + (install-sigint-handler): ... use this instead + 2008-12-30 Tobias C. Rittweiler <tcr(a)freebits.de> As of now, `C-u C-c C-c' compiled a function with maximum debug Index: slime/contrib/ChangeLog diff -u slime/contrib/ChangeLog:1.156 slime/contrib/ChangeLog:1.160 --- slime/contrib/ChangeLog:1.156 Tue Dec 30 19:04:06 2008 +++ slime/contrib/ChangeLog Wed Dec 31 16:55:26 2008 @@ -1,3 +1,21 @@ +2008-12-31 Tobias C. Rittweiler <tcr(a)freebits.de> + + * swank-arglists.lisp (format-arglist-for-echo-area): Catch errors + and die gracefully. + +2008-12-31 Tobias C. Rittweiler <tcr(a)freebits.de> + + * swank-sbcl-exts.lisp: Wrap file in a big #+sbcl (PROGN ...), so + users can use the `slime-sbcl-exts' contrib in their .emacs + nevermind what implementation they actually use. + (Reported by Stas Boukarev) + +2008-12-31 Helmut Eller <heller(a)common-lisp.net> + + * inferior-slime.el (inferior-slime-change-directory): New + function. + (inferior-slime-init): Hook it in. + 2008-12-30 Tobias C. Rittweiler <tcr(a)freebits.de> * slime-repl.lisp (slime-repl-set-package): Set

1 0