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

[slime-devel] Daily ChangeLog diff
by Helmut Eller 24 Apr '12

24 Apr '12

Index: slime/ChangeLog diff -u slime/ChangeLog:1.2318 slime/ChangeLog:1.2319 --- slime/ChangeLog:1.2318 Fri Apr 20 05:45:28 2012 +++ slime/ChangeLog Mon Apr 23 09:32:52 2012 @@ -1,3 +1,10 @@ +2012-04-23 Christophe Rhodes <csr21(a)cantab.net> + + * slime.el (slime-operator-before-point-function): new variable. + (slime-operator-before-point): use it. + (slime-lisp-operator-before-point): default implementation for + slime-operator-before-point-function (unchanged from before). + 2012-04-20 Nikodemus Siivola <nikodemus(a)random-state.net> * swank-sbcl.lisp (stream-force-output :around): Workaroud for

1 0

[slime-devel] swank-loader.lisp": file does not exist?
by Michael Rice 23 Apr '12

23 Apr '12

Hi, Any idea why I'm having a problem getting Slime to run on Fedora 16 (64-bit)? SBCL, Emacs, Slime, and ASDF all installed from Fedora repos. I read some prior posts and the problem, on Ubuntu/Debian, seemed to have been solved by "purging" slime and swank. Same solution on Fedora, with re-install from Slime website? Michael My .emacs file: [michael@sabal ~]$ cat .emacs (add-to-list 'load-path "/usr/share/emacs/site-lisp/slime/") ; your SLIME directory (setq inferior-lisp-program "/usr/bin/sbcl") ; your Lisp system (require 'slime) (slime-setup) [michael@sabal ~]$ Michael ============ Emacs complaint============= (progn (load "/usr/share/emacs/site-lisp/slime/swank-loader.lisp" :verbose t) (funcall (read-from-string "swank-loader:init")) (funcall (read-from-string "swank:start-server") "/tmp/slime.18421" :coding-system "iso-latin-1-unix")) This is SBCL 1.0.51-1.fc16, an implementation of ANSI Common Lisp. More information about SBCL is available at <http://www.sbcl.org/>. SBCL is free software, provided as is, with absolutely no warranty. It is mostly in the public domain; some portions are provided under BSD-style licenses. See the CREDITS and COPYING files in the distribution for more information. * debugger invoked on a SB-INT:SIMPLE-FILE-ERROR in thread #<THREAD "initial thread" RUNNING {1002A68DC1}>: Couldn't load "/usr/share/emacs/site-lisp/slime/swank-loader.lisp": file does not exist. Type HELP for debugger help, or (SB-EXT:QUIT) to exit from SBCL. restarts (invokable by number or by possibly-abbreviated name): 0: [ABORT] Exit debugger, returning to top level. (LOAD "/usr/share/emacs/site-lisp/slime/swank-loader.lisp" :VERBOSE T :PRINT NIL :IF-DOES-NOT-EXIST T :EXTERNAL-FORMAT :DEFAULT) 0]

1 0

[slime-devel] Daily ChangeLog diff
by Helmut Eller 21 Apr '12

21 Apr '12

Index: slime/ChangeLog diff -u slime/ChangeLog:1.2316 slime/ChangeLog:1.2318 --- slime/ChangeLog:1.2316 Wed Apr 11 04:38:56 2012 +++ slime/ChangeLog Fri Apr 20 05:45:28 2012 @@ -1,3 +1,21 @@ +2012-04-20 Nikodemus Siivola <nikodemus(a)random-state.net> + + * swank-sbcl.lisp (stream-force-output :around): Workaroud for + deadlocks between auto-flush-thread buffer write lock and world + lock. + (slime-output-stream): Dummy forward definition for the benefit of + the defmethod. + +2012-04-20 Nikodemus Siivola <nikodemus(a)random-state.net> + + * swank-sbcl.lisp (swank-value): New function, makes it easy to + refer to variables in SWANK -- which doesn't exist when the + backend is loaded. + (lisp-source-location): One of the strings being interned was + downcased. Fix using SWANK-VALUE. + (make-socket-io-stream): Use SWANK-VALUE instead of INTERN & + SYMBOL-VALUE. + 2012-04-11 Helmut Eller <heller(a)common-lisp.net> * slime.el ([test] utf-8-source): Use the encoded byte sequence of

1 0

[slime-devel] Deadlock at the repl
by Stelian Ionescu 20 Apr '12

20 Apr '12

When compiling IOlib from scratch(after deleting all fasls) I get the following deadlock pretty reliably. At least one other person(Brian O'Reilly) getis this often so it's not just my setup. I'm using slime HEAD on threaded sbcl 1.0.55 Linux/x86_64 with *communication-style* :spawn and *globally-redirect-io* t Help! 11 nested errors. SB-KERNEL:*MAXIMUM-ERROR-DEPTH* exceeded. 0: (SB-DEBUG::MAP-BACKTRACE #<CLOSURE (LAMBDA (SB-DEBUG::FRAME) :IN BACKTRACE) {100E3C4CEB}> :START 0 :COUNT 4611686018427387903) 1: (BACKTRACE 4611686018427387903 #<SYNONYM-STREAM :SYMBOL SB-SYS:*TTY* {100E3C49A3}>) 2: ((LAMBDA NIL :IN SB-IMPL::ERROR-ERROR)) 3: (SB-IMPL::%WITH-STANDARD-IO-SYNTAX #<CLOSURE (LAMBDA NIL :IN SB-IMPL::ERROR-ERROR) {100E3C4BDB}>) 4: (SB-IMPL::ERROR-ERROR "Help! " 11 " nested errors. " "SB-KERNEL:*MAXIMUM-ERROR-DEPTH* exceeded.") 5: (SB-IMPL::INFINITE-ERROR-PROTECTOR) 6: (ERROR SB-THREAD:THREAD-DEADLOCK :THREAD #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}> :CYCLE ((#1=#<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}> . #<SB-THREAD:MUTEX "buffer write lock" owner: #2=#<SB-THREAD:THREAD "auto-flush-thread" waiting on: #3=#<MUTEX "World Lock" owner: #1#> {1003B2FDD3}>>) (#2# #3#))) 7: (SB-THREAD::CHECK-DEADLOCK) 8: (SB-THREAD::%WAIT-FOR-MUTEX #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>> #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}> NIL NIL NIL NIL NIL NIL) 9: ((FLET #:WITHOUT-INTERRUPTS-BODY-88874 :IN SB-THREAD::CALL-WITH-RECURSIVE-LOCK)) 10: (SB-THREAD::CALL-WITH-RECURSIVE-LOCK #<CLOSURE (FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN SWANK-BACKEND:CALL-WITH-LOCK-HELD) {7FFFF481402B}> #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>>) 11: ((FLET SWANK-BACKEND:CALL-WITH-LOCK-HELD :IN "/home/hechee/lisp/src/slime-pkg/swank.2012-03-10-01:53:57/swank-sbcl.lisp") #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>> #<CLOSURE (LAMBDA NIL :IN STREAM-WRITE-STRING) {100E3C2B2B}>) 12: (SWANK-BACKEND:CALL-WITH-LOCK-HELD #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>> #<CLOSURE (LAMBDA NIL :IN STREAM-WRITE-STRING) {100E3C2B2B}>) 13: ((SB-PCL::FAST-METHOD STREAM-WRITE-STRING (SWANK-BACKEND::SLIME-OUTPUT-STREAM T)) #<unused argument> #<unused argument> #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}> "Help! " 0 6) 14: (SB-IMPL::%WRITE-STRING "Help! " #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}> 0 6) 15: (SB-IMPL::%WRITE-STRING "Help! " #<TWO-WAY-STREAM :INPUT-STREAM #<SWANK-BACKEND::SLIME-INPUT-STREAM {10029F0083}> :OUTPUT-STREAM #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>> 0 NIL) 16: ((LABELS SB-IMPL::HANDLE-IT :IN SB-KERNEL:OUTPUT-OBJECT) #<TWO-WAY-STREAM :INPUT-STREAM #<SWANK-BACKEND::SLIME-INPUT-STREAM {10029F0083}> :OUTPUT-STREAM #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>>) 17: (PRINC "Help! " #<TWO-WAY-STREAM :INPUT-STREAM #<SWANK-BACKEND::SLIME-INPUT-STREAM {10029F0083}> :OUTPUT-STREAM #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>>) 18: ((LAMBDA NIL :IN SB-IMPL::ERROR-ERROR)) 19: (SB-IMPL::%WITH-STANDARD-IO-SYNTAX #<CLOSURE (LAMBDA NIL :IN SB-IMPL::ERROR-ERROR) {100E3C2AEB}>) 20: (SB-IMPL::ERROR-ERROR "Help! " 11 " nested errors. " "SB-KERNEL:*MAXIMUM-ERROR-DEPTH* exceeded.") 21: (SB-IMPL::INFINITE-ERROR-PROTECTOR) 22: (ERROR SB-THREAD:THREAD-DEADLOCK :THREAD #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}> :CYCLE ((#1=#<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}> . #<SB-THREAD:MUTEX "buffer write lock" owner: #2=#<SB-THREAD:THREAD "auto-flush-thread" waiting on: #3=#<MUTEX "World Lock" owner: #1#> {1003B2FDD3}>>) (#2# #3#))) 23: (SB-THREAD::CHECK-DEADLOCK) 24: (SB-THREAD::%WAIT-FOR-MUTEX #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>> #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}> NIL NIL NIL NIL NIL NIL) 25: ((FLET #:WITHOUT-INTERRUPTS-BODY-88874 :IN SB-THREAD::CALL-WITH-RECURSIVE-LOCK)) 26: (SB-THREAD::CALL-WITH-RECURSIVE-LOCK #<CLOSURE (FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN SWANK-BACKEND:CALL-WITH-LOCK-HELD) {7FFFF481484B}> #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>>) 27: ((FLET SWANK-BACKEND:CALL-WITH-LOCK-HELD :IN "/home/hechee/lisp/src/slime-pkg/swank.2012-03-10-01:53:57/swank-sbcl.lisp") #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>> #<CLOSURE (LAMBDA NIL :IN STREAM-FINISH-OUTPUT) {100E3C29EB}>) 28: (SWANK-BACKEND:CALL-WITH-LOCK-HELD #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>> #<CLOSURE (LAMBDA NIL :IN STREAM-FINISH-OUTPUT) {100E3C29EB}>) 29: ((SB-PCL::FAST-METHOD STREAM-FINISH-OUTPUT (SWANK-BACKEND::SLIME-OUTPUT-STREAM)) #<unused argument> #<unused argument> #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>) 30: ((SB-PCL::FAST-METHOD STREAM-FORCE-OUTPUT (SWANK-BACKEND::SLIME-OUTPUT-STREAM)) #<unused argument> #<unused argument> #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>) 31: (FORCE-OUTPUT #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>) 32: (FORCE-OUTPUT #<TWO-WAY-STREAM :INPUT-STREAM #<SWANK-BACKEND::SLIME-INPUT-STREAM {10029F0083}> :OUTPUT-STREAM #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>>) 33: (SWANK::FORCE-USER-OUTPUT) 34: (SWANK::DEBUG-IN-EMACS #<SB-THREAD:THREAD-DEADLOCK {100E3BB583}>) 35: (SWANK:INVOKE-SLIME-DEBUGGER #<SB-THREAD:THREAD-DEADLOCK {100E3BB583}>) 36: ((LAMBDA NIL :IN SWANK:SWANK-DEBUGGER-HOOK)) 37: (SWANK-BACKEND::CALL-WITH-BREAK-HOOK #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK> #<CLOSURE (LAMBDA NIL :IN SWANK:SWANK-DEBUGGER-HOOK) {100E3C292B}>) 38: ((FLET SWANK-BACKEND:CALL-WITH-DEBUGGER-HOOK :IN "/home/hechee/lisp/src/slime-pkg/swank.2012-03-10-01:53:57/swank-sbcl.lisp") #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK> #<CLOSURE (LAMBDA NIL :IN SWANK:SWANK-DEBUGGER-HOOK) {100E3C292B}>) 39: (SWANK-BACKEND:CALL-WITH-DEBUGGER-HOOK #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK> #<CLOSURE (LAMBDA NIL :IN SWANK:SWANK-DEBUGGER-HOOK) {100E3C292B}>) 40: ((FLET #:FORM-FUN-4760 :IN SWANK:SWANK-DEBUGGER-HOOK)) 41: (SWANK:SWANK-DEBUGGER-HOOK #<SB-THREAD:THREAD-DEADLOCK {100E3BB583}> #<unused argument>) 42: (SB-DEBUG::RUN-HOOK *DEBUGGER-HOOK* #<SB-THREAD:THREAD-DEADLOCK {100E3BB583}>) 43: (INVOKE-DEBUGGER #<SB-THREAD:THREAD-DEADLOCK {100E3BB583}>) 44: (ERROR SB-THREAD:THREAD-DEADLOCK :THREAD #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}> :CYCLE ((#1=#<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}> . #<SB-THREAD:MUTEX "buffer write lock" owner: #2=#<SB-THREAD:THREAD "auto-flush-thread" waiting on: #3=#<MUTEX "World Lock" owner: #1#> {1003B2FDD3}>>) (#2# #3#))) 45: (SB-THREAD::CHECK-DEADLOCK) 46: (SB-THREAD::%WAIT-FOR-MUTEX #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>> #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}> NIL NIL NIL NIL NIL NIL) 47: ((FLET #:WITHOUT-INTERRUPTS-BODY-88874 :IN SB-THREAD::CALL-WITH-RECURSIVE-LOCK)) 48: (SB-THREAD::CALL-WITH-RECURSIVE-LOCK #<CLOSURE (FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN SWANK-BACKEND:CALL-WITH-LOCK-HELD) {7FFFF481538B}> #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>>) 49: ((FLET SWANK-BACKEND:CALL-WITH-LOCK-HELD :IN "/home/hechee/lisp/src/slime-pkg/swank.2012-03-10-01:53:57/swank-sbcl.lisp") #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>> #<CLOSURE (LAMBDA NIL :IN STREAM-FINISH-OUTPUT) {100E3BB48B}>) 50: (SWANK-BACKEND:CALL-WITH-LOCK-HELD #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>> #<CLOSURE (LAMBDA NIL :IN STREAM-FINISH-OUTPUT) {100E3BB48B}>) 51: ((SB-PCL::FAST-METHOD STREAM-FINISH-OUTPUT (SWANK-BACKEND::SLIME-OUTPUT-STREAM)) #<unused argument> #<unused argument> #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>) 52: ((SB-PCL::FAST-METHOD STREAM-FORCE-OUTPUT (SWANK-BACKEND::SLIME-OUTPUT-STREAM)) #<unused argument> #<unused argument> #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>) 53: (FORCE-OUTPUT #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>) 54: (FORCE-OUTPUT #<TWO-WAY-STREAM :INPUT-STREAM #<SWANK-BACKEND::SLIME-INPUT-STREAM {10029F0083}> :OUTPUT-STREAM #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>>) 55: (SWANK::FORCE-USER-OUTPUT) 56: (SWANK::DEBUG-IN-EMACS #<SB-THREAD:THREAD-DEADLOCK {100E3B4023}>) 57: (SWANK:INVOKE-SLIME-DEBUGGER #<SB-THREAD:THREAD-DEADLOCK {100E3B4023}>) 58: ((LAMBDA NIL :IN SWANK:SWANK-DEBUGGER-HOOK)) 59: (SWANK-BACKEND::CALL-WITH-BREAK-HOOK #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK> #<CLOSURE (LAMBDA NIL :IN SWANK:SWANK-DEBUGGER-HOOK) {100E3BB3CB}>) 60: ((FLET SWANK-BACKEND:CALL-WITH-DEBUGGER-HOOK :IN "/home/hechee/lisp/src/slime-pkg/swank.2012-03-10-01:53:57/swank-sbcl.lisp") #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK> #<CLOSURE (LAMBDA NIL :IN SWANK:SWANK-DEBUGGER-HOOK) {100E3BB3CB}>) 61: (SWANK-BACKEND:CALL-WITH-DEBUGGER-HOOK #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK> #<CLOSURE (LAMBDA NIL :IN SWANK:SWANK-DEBUGGER-HOOK) {100E3BB3CB}>) 62: ((FLET #:FORM-FUN-4760 :IN SWANK:SWANK-DEBUGGER-HOOK)) 63: (SWANK:SWANK-DEBUGGER-HOOK #<SB-THREAD:THREAD-DEADLOCK {100E3B4023}> #<unused argument>) 64: (SB-DEBUG::RUN-HOOK *DEBUGGER-HOOK* #<SB-THREAD:THREAD-DEADLOCK {100E3B4023}>) 65: (INVOKE-DEBUGGER #<SB-THREAD:THREAD-DEADLOCK {100E3B4023}>) 66: (ERROR SB-THREAD:THREAD-DEADLOCK :THREAD #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}> :CYCLE ((#1=#<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}> . #<SB-THREAD:MUTEX "buffer write lock" owner: #2=#<SB-THREAD:THREAD "auto-flush-thread" waiting on: #3=#<MUTEX "World Lock" owner: #1#> {1003B2FDD3}>>) (#2# #3#))) 67: (SB-THREAD::CHECK-DEADLOCK) 68: (SB-THREAD::%WAIT-FOR-MUTEX #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>> #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}> NIL NIL NIL NIL NIL NIL) 69: ((FLET #:WITHOUT-INTERRUPTS-BODY-88874 :IN SB-THREAD::CALL-WITH-RECURSIVE-LOCK)) 70: (SB-THREAD::CALL-WITH-RECURSIVE-LOCK #<CLOSURE (FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN SWANK-BACKEND:CALL-WITH-LOCK-HELD) {7FFFF4815ECB}> #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>>) 71: ((FLET SWANK-BACKEND:CALL-WITH-LOCK-HELD :IN "/home/hechee/lisp/src/slime-pkg/swank.2012-03-10-01:53:57/swank-sbcl.lisp") #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>> #<CLOSURE (LAMBDA NIL :IN STREAM-FINISH-OUTPUT) {100E3B3F2B}>) 72: (SWANK-BACKEND:CALL-WITH-LOCK-HELD #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>> #<CLOSURE (LAMBDA NIL :IN STREAM-FINISH-OUTPUT) {100E3B3F2B}>) 73: ((SB-PCL::FAST-METHOD STREAM-FINISH-OUTPUT (SWANK-BACKEND::SLIME-OUTPUT-STREAM)) #<unused argument> #<unused argument> #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>) 74: ((SB-PCL::FAST-METHOD STREAM-FORCE-OUTPUT (SWANK-BACKEND::SLIME-OUTPUT-STREAM)) #<unused argument> #<unused argument> #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>) 75: (FORCE-OUTPUT #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>) 76: (FORCE-OUTPUT #<TWO-WAY-STREAM :INPUT-STREAM #<SWANK-BACKEND::SLIME-INPUT-STREAM {10029F0083}> :OUTPUT-STREAM #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>>) 77: (SWANK::FORCE-USER-OUTPUT) 78: (SWANK::DEBUG-IN-EMACS #<SB-THREAD:THREAD-DEADLOCK {100E3ACA83}>) 79: (SWANK:INVOKE-SLIME-DEBUGGER #<SB-THREAD:THREAD-DEADLOCK {100E3ACA83}>) 80: ((LAMBDA NIL :IN SWANK:SWANK-DEBUGGER-HOOK)) 81: (SWANK-BACKEND::CALL-WITH-BREAK-HOOK #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK> #<CLOSURE (LAMBDA NIL :IN SWANK:SWANK-DEBUGGER-HOOK) {100E3B3E6B}>) 82: ((FLET SWANK-BACKEND:CALL-WITH-DEBUGGER-HOOK :IN "/home/hechee/lisp/src/slime-pkg/swank.2012-03-10-01:53:57/swank-sbcl.lisp") #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK> #<CLOSURE (LAMBDA NIL :IN SWANK:SWANK-DEBUGGER-HOOK) {100E3B3E6B}>) 83: (SWANK-BACKEND:CALL-WITH-DEBUGGER-HOOK #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK> #<CLOSURE (LAMBDA NIL :IN SWANK:SWANK-DEBUGGER-HOOK) {100E3B3E6B}>) 84: ((FLET #:FORM-FUN-4760 :IN SWANK:SWANK-DEBUGGER-HOOK)) 85: (SWANK:SWANK-DEBUGGER-HOOK #<SB-THREAD:THREAD-DEADLOCK {100E3ACA83}> #<unused argument>) 86: (SB-DEBUG::RUN-HOOK *DEBUGGER-HOOK* #<SB-THREAD:THREAD-DEADLOCK {100E3ACA83}>) 87: (INVOKE-DEBUGGER #<SB-THREAD:THREAD-DEADLOCK {100E3ACA83}>) 88: (ERROR SB-THREAD:THREAD-DEADLOCK :THREAD #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}> :CYCLE ((#1=#<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}> . #<SB-THREAD:MUTEX "buffer write lock" owner: #2=#<SB-THREAD:THREAD "auto-flush-thread" waiting on: #3=#<MUTEX "World Lock" owner: #1#> {1003B2FDD3}>>) (#2# #3#))) 89: (SB-THREAD::CHECK-DEADLOCK) 90: (SB-THREAD::%WAIT-FOR-MUTEX #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>> #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}> NIL NIL NIL NIL NIL NIL) 91: ((FLET #:WITHOUT-INTERRUPTS-BODY-88874 :IN SB-THREAD::CALL-WITH-RECURSIVE-LOCK)) 92: (SB-THREAD::CALL-WITH-RECURSIVE-LOCK #<CLOSURE (FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN SWANK-BACKEND:CALL-WITH-LOCK-HELD) {7FFFF4816A0B}> #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>>) 93: ((FLET SWANK-BACKEND:CALL-WITH-LOCK-HELD :IN "/home/hechee/lisp/src/slime-pkg/swank.2012-03-10-01:53:57/swank-sbcl.lisp") #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>> #<CLOSURE (LAMBDA NIL :IN STREAM-FINISH-OUTPUT) {100E3AC98B}>) 94: (SWANK-BACKEND:CALL-WITH-LOCK-HELD #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>> #<CLOSURE (LAMBDA NIL :IN STREAM-FINISH-OUTPUT) {100E3AC98B}>) 95: ((SB-PCL::FAST-METHOD STREAM-FINISH-OUTPUT (SWANK-BACKEND::SLIME-OUTPUT-STREAM)) #<unused argument> #<unused argument> #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>) 96: ((SB-PCL::FAST-METHOD STREAM-FORCE-OUTPUT (SWANK-BACKEND::SLIME-OUTPUT-STREAM)) #<unused argument> #<unused argument> #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>) 97: (FORCE-OUTPUT #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>) 98: (FORCE-OUTPUT #<TWO-WAY-STREAM :INPUT-STREAM #<SWANK-BACKEND::SLIME-INPUT-STREAM {10029F0083}> :OUTPUT-STREAM #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>>) 99: (SWANK::FORCE-USER-OUTPUT) 100: (SWANK::DEBUG-IN-EMACS #<SB-THREAD:THREAD-DEADLOCK {100E3A52C3}>) 101: (SWANK:INVOKE-SLIME-DEBUGGER #<SB-THREAD:THREAD-DEADLOCK {100E3A52C3}>) 102: ((LAMBDA NIL :IN SWANK:SWANK-DEBUGGER-HOOK)) 103: (SWANK-BACKEND::CALL-WITH-BREAK-HOOK #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK> #<CLOSURE (LAMBDA NIL :IN SWANK:SWANK-DEBUGGER-HOOK) {100E3AC8CB}>) 104: ((FLET SWANK-BACKEND:CALL-WITH-DEBUGGER-HOOK :IN "/home/hechee/lisp/src/slime-pkg/swank.2012-03-10-01:53:57/swank-sbcl.lisp") #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK> #<CLOSURE (LAMBDA NIL :IN SWANK:SWANK-DEBUGGER-HOOK) {100E3AC8CB}>) 105: (SWANK-BACKEND:CALL-WITH-DEBUGGER-HOOK #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK> #<CLOSURE (LAMBDA NIL :IN SWANK:SWANK-DEBUGGER-HOOK) {100E3AC8CB}>) 106: ((FLET #:FORM-FUN-4760 :IN SWANK:SWANK-DEBUGGER-HOOK)) 107: (SWANK:SWANK-DEBUGGER-HOOK #<SB-THREAD:THREAD-DEADLOCK {100E3A52C3}> #<unused argument>) 108: (SB-DEBUG::RUN-HOOK *DEBUGGER-HOOK* #<SB-THREAD:THREAD-DEADLOCK {100E3A52C3}>) 109: (INVOKE-DEBUGGER #<SB-THREAD:THREAD-DEADLOCK {100E3A52C3}>) 110: (ERROR SB-THREAD:THREAD-DEADLOCK :THREAD #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}> :CYCLE ((#1=#<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}> . #<SB-THREAD:MUTEX "buffer write lock" owner: #2=#<SB-THREAD:THREAD "auto-flush-thread" waiting on: #3=#<MUTEX "World Lock" owner: #1#> {1003B2FDD3}>>) (#2# #3#))) 111: (SB-THREAD::CHECK-DEADLOCK) 112: (SB-THREAD::%WAIT-FOR-MUTEX #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>> #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}> NIL NIL NIL NIL NIL NIL) 113: ((FLET #:WITHOUT-INTERRUPTS-BODY-88874 :IN SB-THREAD::CALL-WITH-RECURSIVE-LOCK)) 114: (SB-THREAD::CALL-WITH-RECURSIVE-LOCK #<CLOSURE (FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN SWANK-BACKEND:CALL-WITH-LOCK-HELD) {7FFFF481754B}> #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>>) 115: ((FLET SWANK-BACKEND:CALL-WITH-LOCK-HELD :IN "/home/hechee/lisp/src/slime-pkg/swank.2012-03-10-01:53:57/swank-sbcl.lisp") #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>> #<CLOSURE (LAMBDA NIL :IN STREAM-FINISH-OUTPUT) {100E3A51CB}>) 116: (SWANK-BACKEND:CALL-WITH-LOCK-HELD #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>> #<CLOSURE (LAMBDA NIL :IN STREAM-FINISH-OUTPUT) {100E3A51CB}>) 117: ((SB-PCL::FAST-METHOD STREAM-FINISH-OUTPUT (SWANK-BACKEND::SLIME-OUTPUT-STREAM)) #<unused argument> #<unused argument> #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>) 118: ((SB-PCL::FAST-METHOD STREAM-FORCE-OUTPUT (SWANK-BACKEND::SLIME-OUTPUT-STREAM)) #<unused argument> #<unused argument> #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>) 119: (FORCE-OUTPUT #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>) 120: (FORCE-OUTPUT #<TWO-WAY-STREAM :INPUT-STREAM #<SWANK-BACKEND::SLIME-INPUT-STREAM {10029F0083}> :OUTPUT-STREAM #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>>) 121: (SWANK::FORCE-USER-OUTPUT) 122: (SWANK::DEBUG-IN-EMACS #<SB-THREAD:THREAD-DEADLOCK {100E39DBF3}>) 123: (SWANK:INVOKE-SLIME-DEBUGGER #<SB-THREAD:THREAD-DEADLOCK {100E39DBF3}>) 124: ((LAMBDA NIL :IN SWANK:SWANK-DEBUGGER-HOOK)) 125: (SWANK-BACKEND::CALL-WITH-BREAK-HOOK #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK> #<CLOSURE (LAMBDA NIL :IN SWANK:SWANK-DEBUGGER-HOOK) {100E3A510B}>) 126: ((FLET SWANK-BACKEND:CALL-WITH-DEBUGGER-HOOK :IN "/home/hechee/lisp/src/slime-pkg/swank.2012-03-10-01:53:57/swank-sbcl.lisp") #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK> #<CLOSURE (LAMBDA NIL :IN SWANK:SWANK-DEBUGGER-HOOK) {100E3A510B}>) 127: (SWANK-BACKEND:CALL-WITH-DEBUGGER-HOOK #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK> #<CLOSURE (LAMBDA NIL :IN SWANK:SWANK-DEBUGGER-HOOK) {100E3A510B}>) 128: ((FLET #:FORM-FUN-4760 :IN SWANK:SWANK-DEBUGGER-HOOK)) 129: (SWANK:SWANK-DEBUGGER-HOOK #<SB-THREAD:THREAD-DEADLOCK {100E39DBF3}> #<unused argument>) 130: (SB-DEBUG::RUN-HOOK *DEBUGGER-HOOK* #<SB-THREAD:THREAD-DEADLOCK {100E39DBF3}>) 131: (INVOKE-DEBUGGER #<SB-THREAD:THREAD-DEADLOCK {100E39DBF3}>) 132: (ERROR SB-THREAD:THREAD-DEADLOCK :THREAD #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}> :CYCLE ((#1=#<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}> . #<SB-THREAD:MUTEX "buffer write lock" owner: #2=#<SB-THREAD:THREAD "auto-flush-thread" waiting on: #3=#<MUTEX "World Lock" owner: #1#> {1003B2FDD3}>>) (#2# #3#))) 133: (SB-THREAD::CHECK-DEADLOCK) 134: (SB-THREAD::%WAIT-FOR-MUTEX #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>> #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}> NIL NIL NIL NIL NIL NIL) 135: ((FLET #:WITHOUT-INTERRUPTS-BODY-88874 :IN SB-THREAD::CALL-WITH-RECURSIVE-LOCK)) 136: (SB-THREAD::CALL-WITH-RECURSIVE-LOCK #<CLOSURE (FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN SWANK-BACKEND:CALL-WITH-LOCK-HELD) {7FFFF481808B}> #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>>) 137: ((FLET SWANK-BACKEND:CALL-WITH-LOCK-HELD :IN "/home/hechee/lisp/src/slime-pkg/swank.2012-03-10-01:53:57/swank-sbcl.lisp") #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>> #<CLOSURE (LAMBDA NIL :IN STREAM-FINISH-OUTPUT) {100E39DAFB}>) 138: (SWANK-BACKEND:CALL-WITH-LOCK-HELD #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>> #<CLOSURE (LAMBDA NIL :IN STREAM-FINISH-OUTPUT) {100E39DAFB}>) 139: ((SB-PCL::FAST-METHOD STREAM-FINISH-OUTPUT (SWANK-BACKEND::SLIME-OUTPUT-STREAM)) #<unused argument> #<unused argument> #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>) 140: ((SB-PCL::FAST-METHOD STREAM-FORCE-OUTPUT (SWANK-BACKEND::SLIME-OUTPUT-STREAM)) #<unused argument> #<unused argument> #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>) 141: (FORCE-OUTPUT #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>) 142: (FORCE-OUTPUT #<TWO-WAY-STREAM :INPUT-STREAM #<SWANK-BACKEND::SLIME-INPUT-STREAM {10029F0083}> :OUTPUT-STREAM #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>>) 143: (SWANK::FORCE-USER-OUTPUT) 144: (SWANK::DEBUG-IN-EMACS #<SB-THREAD:THREAD-DEADLOCK {100E396713}>) 145: (SWANK:INVOKE-SLIME-DEBUGGER #<SB-THREAD:THREAD-DEADLOCK {100E396713}>) 146: ((LAMBDA NIL :IN SWANK:SWANK-DEBUGGER-HOOK)) 147: (SWANK-BACKEND::CALL-WITH-BREAK-HOOK #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK> #<CLOSURE (LAMBDA NIL :IN SWANK:SWANK-DEBUGGER-HOOK) {100E39DA3B}>) 148: ((FLET SWANK-BACKEND:CALL-WITH-DEBUGGER-HOOK :IN "/home/hechee/lisp/src/slime-pkg/swank.2012-03-10-01:53:57/swank-sbcl.lisp") #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK> #<CLOSURE (LAMBDA NIL :IN SWANK:SWANK-DEBUGGER-HOOK) {100E39DA3B}>) 149: (SWANK-BACKEND:CALL-WITH-DEBUGGER-HOOK #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK> #<CLOSURE (LAMBDA NIL :IN SWANK:SWANK-DEBUGGER-HOOK) {100E39DA3B}>) 150: ((FLET #:FORM-FUN-4760 :IN SWANK:SWANK-DEBUGGER-HOOK)) 151: (SWANK:SWANK-DEBUGGER-HOOK #<SB-THREAD:THREAD-DEADLOCK {100E396713}> #<unused argument>) 152: (SB-DEBUG::RUN-HOOK *DEBUGGER-HOOK* #<SB-THREAD:THREAD-DEADLOCK {100E396713}>) 153: (INVOKE-DEBUGGER #<SB-THREAD:THREAD-DEADLOCK {100E396713}>) 154: (ERROR SB-THREAD:THREAD-DEADLOCK :THREAD #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}> :CYCLE ((#1=#<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}> . #<SB-THREAD:MUTEX "buffer write lock" owner: #2=#<SB-THREAD:THREAD "auto-flush-thread" waiting on: #3=#<MUTEX "World Lock" owner: #1#> {1003B2FDD3}>>) (#2# #3#))) 155: (SB-THREAD::CHECK-DEADLOCK) 156: (SB-THREAD::%WAIT-FOR-MUTEX #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>> #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}> NIL NIL NIL NIL NIL NIL) 157: ((FLET #:WITHOUT-INTERRUPTS-BODY-88874 :IN SB-THREAD::CALL-WITH-RECURSIVE-LOCK)) 158: (SB-THREAD::CALL-WITH-RECURSIVE-LOCK #<CLOSURE (FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN SWANK-BACKEND:CALL-WITH-LOCK-HELD) {7FFFF4818BCB}> #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>>) 159: ((FLET SWANK-BACKEND:CALL-WITH-LOCK-HELD :IN "/home/hechee/lisp/src/slime-pkg/swank.2012-03-10-01:53:57/swank-sbcl.lisp") #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>> #<CLOSURE (LAMBDA NIL :IN STREAM-FINISH-OUTPUT) {100E39661B}>) 160: (SWANK-BACKEND:CALL-WITH-LOCK-HELD #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>> #<CLOSURE (LAMBDA NIL :IN STREAM-FINISH-OUTPUT) {100E39661B}>) 161: ((SB-PCL::FAST-METHOD STREAM-FINISH-OUTPUT (SWANK-BACKEND::SLIME-OUTPUT-STREAM)) #<unused argument> #<unused argument> #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>) 162: ((SB-PCL::FAST-METHOD STREAM-FORCE-OUTPUT (SWANK-BACKEND::SLIME-OUTPUT-STREAM)) #<unused argument> #<unused argument> #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>) 163: (FORCE-OUTPUT #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>) 164: (FORCE-OUTPUT #<TWO-WAY-STREAM :INPUT-STREAM #<SWANK-BACKEND::SLIME-INPUT-STREAM {10029F0083}> :OUTPUT-STREAM #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>>) 165: (SWANK::FORCE-USER-OUTPUT) 166: (SWANK::DEBUG-IN-EMACS #<SB-THREAD:THREAD-DEADLOCK {100E38F273}>) 167: (SWANK:INVOKE-SLIME-DEBUGGER #<SB-THREAD:THREAD-DEADLOCK {100E38F273}>) 168: ((LAMBDA NIL :IN SWANK:SWANK-DEBUGGER-HOOK)) 169: (SWANK-BACKEND::CALL-WITH-BREAK-HOOK #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK> #<CLOSURE (LAMBDA NIL :IN SWANK:SWANK-DEBUGGER-HOOK) {100E39655B}>) 170: ((FLET SWANK-BACKEND:CALL-WITH-DEBUGGER-HOOK :IN "/home/hechee/lisp/src/slime-pkg/swank.2012-03-10-01:53:57/swank-sbcl.lisp") #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK> #<CLOSURE (LAMBDA NIL :IN SWANK:SWANK-DEBUGGER-HOOK) {100E39655B}>) 171: (SWANK-BACKEND:CALL-WITH-DEBUGGER-HOOK #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK> #<CLOSURE (LAMBDA NIL :IN SWANK:SWANK-DEBUGGER-HOOK) {100E39655B}>) 172: ((FLET #:FORM-FUN-4760 :IN SWANK:SWANK-DEBUGGER-HOOK)) 173: (SWANK:SWANK-DEBUGGER-HOOK #<SB-THREAD:THREAD-DEADLOCK {100E38F273}> #<unused argument>) 174: (SB-DEBUG::RUN-HOOK *DEBUGGER-HOOK* #<SB-THREAD:THREAD-DEADLOCK {100E38F273}>) 175: (INVOKE-DEBUGGER #<SB-THREAD:THREAD-DEADLOCK {100E38F273}>) 176: (ERROR SB-THREAD:THREAD-DEADLOCK :THREAD #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}> :CYCLE ((#1=#<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}> . #<SB-THREAD:MUTEX "buffer write lock" owner: #2=#<SB-THREAD:THREAD "auto-flush-thread" waiting on: #3=#<MUTEX "World Lock" owner: #1#> {1003B2FDD3}>>) (#2# #3#))) 177: (SB-THREAD::CHECK-DEADLOCK) 178: (SB-THREAD::%WAIT-FOR-MUTEX #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>> #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}> NIL NIL NIL NIL NIL NIL) 179: ((FLET #:WITHOUT-INTERRUPTS-BODY-88874 :IN SB-THREAD::CALL-WITH-RECURSIVE-LOCK)) 180: (SB-THREAD::CALL-WITH-RECURSIVE-LOCK #<CLOSURE (FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN SWANK-BACKEND:CALL-WITH-LOCK-HELD) {7FFFF481970B}> #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>>) 181: ((FLET SWANK-BACKEND:CALL-WITH-LOCK-HELD :IN "/home/hechee/lisp/src/slime-pkg/swank.2012-03-10-01:53:57/swank-sbcl.lisp") #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>> #<CLOSURE (LAMBDA NIL :IN STREAM-FINISH-OUTPUT) {100E38F17B}>) 182: (SWANK-BACKEND:CALL-WITH-LOCK-HELD #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>> #<CLOSURE (LAMBDA NIL :IN STREAM-FINISH-OUTPUT) {100E38F17B}>) 183: ((SB-PCL::FAST-METHOD STREAM-FINISH-OUTPUT (SWANK-BACKEND::SLIME-OUTPUT-STREAM)) #<unused argument> #<unused argument> #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>) 184: ((SB-PCL::FAST-METHOD STREAM-FORCE-OUTPUT (SWANK-BACKEND::SLIME-OUTPUT-STREAM)) #<unused argument> #<unused argument> #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>) 185: (FORCE-OUTPUT #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>) 186: (FORCE-OUTPUT #<TWO-WAY-STREAM :INPUT-STREAM #<SWANK-BACKEND::SLIME-INPUT-STREAM {10029F0083}> :OUTPUT-STREAM #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>>) 187: (SWANK::FORCE-USER-OUTPUT) 188: (SWANK::DEBUG-IN-EMACS #<SB-THREAD:THREAD-DEADLOCK {100E387D13}>) 189: (SWANK:INVOKE-SLIME-DEBUGGER #<SB-THREAD:THREAD-DEADLOCK {100E387D13}>) 190: ((LAMBDA NIL :IN SWANK:SWANK-DEBUGGER-HOOK)) 191: (SWANK-BACKEND::CALL-WITH-BREAK-HOOK #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK> #<CLOSURE (LAMBDA NIL :IN SWANK:SWANK-DEBUGGER-HOOK) {100E38F0BB}>) 192: ((FLET SWANK-BACKEND:CALL-WITH-DEBUGGER-HOOK :IN "/home/hechee/lisp/src/slime-pkg/swank.2012-03-10-01:53:57/swank-sbcl.lisp") #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK> #<CLOSURE (LAMBDA NIL :IN SWANK:SWANK-DEBUGGER-HOOK) {100E38F0BB}>) 193: (SWANK-BACKEND:CALL-WITH-DEBUGGER-HOOK #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK> #<CLOSURE (LAMBDA NIL :IN SWANK:SWANK-DEBUGGER-HOOK) {100E38F0BB}>) 194: ((FLET #:FORM-FUN-4760 :IN SWANK:SWANK-DEBUGGER-HOOK)) 195: (SWANK:SWANK-DEBUGGER-HOOK #<SB-THREAD:THREAD-DEADLOCK {100E387D13}> #<unused argument>) 196: (SB-DEBUG::RUN-HOOK *DEBUGGER-HOOK* #<SB-THREAD:THREAD-DEADLOCK {100E387D13}>) 197: (INVOKE-DEBUGGER #<SB-THREAD:THREAD-DEADLOCK {100E387D13}>) 198: (ERROR SB-THREAD:THREAD-DEADLOCK :THREAD #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}> :CYCLE ((#1=#<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}> . #<SB-THREAD:MUTEX "buffer write lock" owner: #2=#<SB-THREAD:THREAD "auto-flush-thread" waiting on: #3=#<MUTEX "World Lock" owner: #1#> {1003B2FDD3}>>) (#2# #3#))) 199: (SB-THREAD::CHECK-DEADLOCK) 200: (SB-THREAD::%WAIT-FOR-MUTEX #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>> #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}> NIL NIL NIL NIL NIL NIL) 201: ((FLET #:WITHOUT-INTERRUPTS-BODY-88874 :IN SB-THREAD::CALL-WITH-RECURSIVE-LOCK)) 202: (SB-THREAD::CALL-WITH-RECURSIVE-LOCK #<CLOSURE (FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN SWANK-BACKEND:CALL-WITH-LOCK-HELD) {7FFFF481A24B}> #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>>) 203: ((FLET SWANK-BACKEND:CALL-WITH-LOCK-HELD :IN "/home/hechee/lisp/src/slime-pkg/swank.2012-03-10-01:53:57/swank-sbcl.lisp") #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>> #<CLOSURE (LAMBDA NIL :IN STREAM-FINISH-OUTPUT) {100E387C1B}>) 204: (SWANK-BACKEND:CALL-WITH-LOCK-HELD #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>> #<CLOSURE (LAMBDA NIL :IN STREAM-FINISH-OUTPUT) {100E387C1B}>) 205: ((SB-PCL::FAST-METHOD STREAM-FINISH-OUTPUT (SWANK-BACKEND::SLIME-OUTPUT-STREAM)) #<unused argument> #<unused argument> #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>) 206: ((SB-PCL::FAST-METHOD STREAM-FORCE-OUTPUT (SWANK-BACKEND::SLIME-OUTPUT-STREAM)) #<unused argument> #<unused argument> #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>) 207: (FORCE-OUTPUT #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>) 208: (FORCE-OUTPUT #<TWO-WAY-STREAM :INPUT-STREAM #<SWANK-BACKEND::SLIME-INPUT-STREAM {10029F0083}> :OUTPUT-STREAM #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>>) 209: (SWANK::FORCE-USER-OUTPUT) 210: (SWANK::DEBUG-IN-EMACS #<SB-THREAD:THREAD-DEADLOCK {100E380133}>) 211: (SWANK:INVOKE-SLIME-DEBUGGER #<SB-THREAD:THREAD-DEADLOCK {100E380133}>) 212: ((LAMBDA NIL :IN SWANK:SWANK-DEBUGGER-HOOK)) 213: (SWANK-BACKEND::CALL-WITH-BREAK-HOOK #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK> #<CLOSURE (LAMBDA NIL :IN SWANK:SWANK-DEBUGGER-HOOK) {100E387B5B}>) 214: ((FLET SWANK-BACKEND:CALL-WITH-DEBUGGER-HOOK :IN "/home/hechee/lisp/src/slime-pkg/swank.2012-03-10-01:53:57/swank-sbcl.lisp") #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK> #<CLOSURE (LAMBDA NIL :IN SWANK:SWANK-DEBUGGER-HOOK) {100E387B5B}>) 215: (SWANK-BACKEND:CALL-WITH-DEBUGGER-HOOK #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK> #<CLOSURE (LAMBDA NIL :IN SWANK:SWANK-DEBUGGER-HOOK) {100E387B5B}>) 216: ((FLET #:FORM-FUN-4760 :IN SWANK:SWANK-DEBUGGER-HOOK)) 217: (SWANK:SWANK-DEBUGGER-HOOK #<SB-THREAD:THREAD-DEADLOCK {100E380133}> #<unused argument>) 218: (SB-DEBUG::RUN-HOOK *DEBUGGER-HOOK* #<SB-THREAD:THREAD-DEADLOCK {100E380133}>) 219: (INVOKE-DEBUGGER #<SB-THREAD:THREAD-DEADLOCK {100E380133}>) 220: (ERROR SB-THREAD:THREAD-DEADLOCK :THREAD #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}> :CYCLE ((#1=#<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}> . #<SB-THREAD:MUTEX "buffer write lock" owner: #2=#<SB-THREAD:THREAD "auto-flush-thread" waiting on: #3=#<MUTEX "World Lock" owner: #1#> {1003B2FDD3}>>) (#2# #3#))) 221: (SB-THREAD::CHECK-DEADLOCK) 222: (SB-THREAD::%WAIT-FOR-MUTEX #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>> #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}> NIL NIL NIL NIL NIL NIL) 223: ((FLET #:WITHOUT-INTERRUPTS-BODY-88874 :IN SB-THREAD::CALL-WITH-RECURSIVE-LOCK)) 224: (SB-THREAD::CALL-WITH-RECURSIVE-LOCK #<CLOSURE (FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN SWANK-BACKEND:CALL-WITH-LOCK-HELD) {7FFFF481AD8B}> #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>>) 225: ((FLET SWANK-BACKEND:CALL-WITH-LOCK-HELD :IN "/home/hechee/lisp/src/slime-pkg/swank.2012-03-10-01:53:57/swank-sbcl.lisp") #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>> #<CLOSURE (LAMBDA NIL :IN STREAM-FINISH-OUTPUT) {100E38003B}>) 226: (SWANK-BACKEND:CALL-WITH-LOCK-HELD #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>> #<CLOSURE (LAMBDA NIL :IN STREAM-FINISH-OUTPUT) {100E38003B}>) 227: ((SB-PCL::FAST-METHOD STREAM-FINISH-OUTPUT (SWANK-BACKEND::SLIME-OUTPUT-STREAM)) #<unused argument> #<unused argument> #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>) 228: ((SB-PCL::FAST-METHOD STREAM-FORCE-OUTPUT (SWANK-BACKEND::SLIME-OUTPUT-STREAM)) #<unused argument> #<unused argument> #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>) 229: (FORCE-OUTPUT #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>) 230: (FORCE-OUTPUT #<TWO-WAY-STREAM :INPUT-STREAM #<SWANK-BACKEND::SLIME-INPUT-STREAM {10029F0083}> :OUTPUT-STREAM #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>>) 231: (SWANK::FORCE-USER-OUTPUT) 232: (SWANK::DEBUG-IN-EMACS #<SB-THREAD:THREAD-DEADLOCK {100E3774E3}>) 233: (SWANK:INVOKE-SLIME-DEBUGGER #<SB-THREAD:THREAD-DEADLOCK {100E3774E3}>) 234: ((LAMBDA NIL :IN SWANK:SWANK-DEBUGGER-HOOK)) 235: (SWANK-BACKEND::CALL-WITH-BREAK-HOOK #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK> #<CLOSURE (LAMBDA NIL :IN SWANK:SWANK-DEBUGGER-HOOK) {100E37FF7B}>) 236: ((FLET SWANK-BACKEND:CALL-WITH-DEBUGGER-HOOK :IN "/home/hechee/lisp/src/slime-pkg/swank.2012-03-10-01:53:57/swank-sbcl.lisp") #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK> #<CLOSURE (LAMBDA NIL :IN SWANK:SWANK-DEBUGGER-HOOK) {100E37FF7B}>) 237: (SWANK-BACKEND:CALL-WITH-DEBUGGER-HOOK #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK> #<CLOSURE (LAMBDA NIL :IN SWANK:SWANK-DEBUGGER-HOOK) {100E37FF7B}>) 238: ((FLET #:FORM-FUN-4760 :IN SWANK:SWANK-DEBUGGER-HOOK)) 239: (SWANK:SWANK-DEBUGGER-HOOK #<SB-THREAD:THREAD-DEADLOCK {100E3774E3}> #<unused argument>) 240: (SB-DEBUG::RUN-HOOK *DEBUGGER-HOOK* #<SB-THREAD:THREAD-DEADLOCK {100E3774E3}>) 241: (INVOKE-DEBUGGER #<SB-THREAD:THREAD-DEADLOCK {100E3774E3}>) 242: (ERROR SB-THREAD:THREAD-DEADLOCK :THREAD #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}> :CYCLE ((#1=#<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}> . #<SB-THREAD:MUTEX "buffer write lock" owner: #2=#<SB-THREAD:THREAD "auto-flush-thread" waiting on: #3=#<MUTEX "World Lock" owner: #1#> {1003B2FDD3}>>) (#2# #3#))) 243: (SB-THREAD::CHECK-DEADLOCK) 244: (SB-THREAD::%WAIT-FOR-MUTEX #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>> #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}> NIL NIL NIL NIL NIL NIL) 245: ((FLET #:WITHOUT-INTERRUPTS-BODY-88874 :IN SB-THREAD::CALL-WITH-RECURSIVE-LOCK)) 246: (SB-THREAD::CALL-WITH-RECURSIVE-LOCK #<CLOSURE (FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN SWANK-BACKEND:CALL-WITH-LOCK-HELD) {7FFFF481B8CB}> #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>>) 247: ((FLET SWANK-BACKEND:CALL-WITH-LOCK-HELD :IN "/home/hechee/lisp/src/slime-pkg/swank.2012-03-10-01:53:57/swank-sbcl.lisp") #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>> #<CLOSURE (LAMBDA NIL :IN STREAM-FINISH-OUTPUT) {100E3773EB}>) 248: (SWANK-BACKEND:CALL-WITH-LOCK-HELD #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>> #<CLOSURE (LAMBDA NIL :IN STREAM-FINISH-OUTPUT) {100E3773EB}>) 249: ((SB-PCL::FAST-METHOD STREAM-FINISH-OUTPUT (SWANK-BACKEND::SLIME-OUTPUT-STREAM)) #<unused argument> #<unused argument> #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>) 250: ((SB-PCL::FAST-METHOD STREAM-FORCE-OUTPUT (SWANK-BACKEND::SLIME-OUTPUT-STREAM)) #<unused argument> #<unused argument> #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>) 251: (FORCE-OUTPUT #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>) 252: (FORCE-OUTPUT #<TWO-WAY-STREAM :INPUT-STREAM #<SWANK-BACKEND::SLIME-INPUT-STREAM {10029F0083}> :OUTPUT-STREAM #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>>) 253: (SWANK::FORCE-USER-OUTPUT) 254: (SWANK::DEBUG-IN-EMACS #<SB-THREAD:THREAD-DEADLOCK {100E3645A3}>) 255: (SWANK:INVOKE-SLIME-DEBUGGER #<SB-THREAD:THREAD-DEADLOCK {100E3645A3}>) 256: ((LAMBDA NIL :IN SWANK:SWANK-DEBUGGER-HOOK)) 257: (SWANK-BACKEND::CALL-WITH-BREAK-HOOK #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK> #<CLOSURE (LAMBDA NIL :IN SWANK:SWANK-DEBUGGER-HOOK) {100E37732B}>) 258: ((FLET SWANK-BACKEND:CALL-WITH-DEBUGGER-HOOK :IN "/home/hechee/lisp/src/slime-pkg/swank.2012-03-10-01:53:57/swank-sbcl.lisp") #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK> #<CLOSURE (LAMBDA NIL :IN SWANK:SWANK-DEBUGGER-HOOK) {100E37732B}>) 259: (SWANK-BACKEND:CALL-WITH-DEBUGGER-HOOK #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK> #<CLOSURE (LAMBDA NIL :IN SWANK:SWANK-DEBUGGER-HOOK) {100E37732B}>) 260: ((FLET #:FORM-FUN-4760 :IN SWANK:SWANK-DEBUGGER-HOOK)) 261: (SWANK:SWANK-DEBUGGER-HOOK #<SB-THREAD:THREAD-DEADLOCK {100E3645A3}> #<unused argument>) 262: (SB-DEBUG::RUN-HOOK *DEBUGGER-HOOK* #<SB-THREAD:THREAD-DEADLOCK {100E3645A3}>) 263: (INVOKE-DEBUGGER #<SB-THREAD:THREAD-DEADLOCK {100E3645A3}>) 264: (ERROR SB-THREAD:THREAD-DEADLOCK :THREAD #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}> :CYCLE ((#1=#<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}> . #<SB-THREAD:MUTEX "buffer write lock" owner: #2=#<SB-THREAD:THREAD "auto-flush-thread" waiting on: #3=#<MUTEX "World Lock" owner: #1#> {1003B2FDD3}>>) (#2# #3#))) 265: (SB-THREAD::CHECK-DEADLOCK) 266: (SB-THREAD::%WAIT-FOR-MUTEX #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>> #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}> NIL NIL NIL NIL NIL NIL) 267: ((FLET #:WITHOUT-INTERRUPTS-BODY-88874 :IN SB-THREAD::CALL-WITH-RECURSIVE-LOCK)) 268: (SB-THREAD::CALL-WITH-RECURSIVE-LOCK #<CLOSURE (FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN SWANK-BACKEND:CALL-WITH-LOCK-HELD) {7FFFF481C40B}> #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>>) 269: ((FLET SWANK-BACKEND:CALL-WITH-LOCK-HELD :IN "/home/hechee/lisp/src/slime-pkg/swank.2012-03-10-01:53:57/swank-sbcl.lisp") #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>> #<CLOSURE (LAMBDA NIL :IN STREAM-WRITE-STRING) {100E36449B}>) 270: (SWANK-BACKEND:CALL-WITH-LOCK-HELD #<SB-THREAD:MUTEX "buffer write lock" owner: #<SB-THREAD:THREAD "auto-flush-thread" waiting on: #<MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> {1003B2FDD3}>> #<CLOSURE (LAMBDA NIL :IN STREAM-WRITE-STRING) {100E36449B}>) 271: ((SB-PCL::FAST-METHOD STREAM-WRITE-STRING (SWANK-BACKEND::SLIME-OUTPUT-STREAM T)) #<unused argument> #<unused argument> #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}> "; " 0 2) 272: (SB-IMPL::%WRITE-STRING "; " #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}> 0 2) 273: (SB-IMPL::%WRITE-STRING "; " #<TWO-WAY-STREAM :INPUT-STREAM #<SWANK-BACKEND::SLIME-INPUT-STREAM {10029F0083}> :OUTPUT-STREAM #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>> 0 NIL) 274: (IOLIB-GROVEL::INVOKE #<unavailable argument> "/home/hechee/.cache/common-lisp/sbcl-1.0.55-linux-x64/work/iolib/src/sockets/grovel.grovel-tmp.lisp") 275: ((LAMBDA NIL :IN IOLIB-GROVEL:PROCESS-GROVEL-FILE)) 276: (SB-IMPL::%WITH-STANDARD-IO-SYNTAX #<CLOSURE (LAMBDA NIL :IN IOLIB-GROVEL:PROCESS-GROVEL-FILE) {100E2D906B}>) 277: (IOLIB-GROVEL:PROCESS-GROVEL-FILE #P"/home/hechee/work/src/iolib/src/sockets/grovel.lisp" #P"/home/hechee/.cache/common-lisp/sbcl-1.0.55-linux-x64/work/iolib/src/sockets/grovel.fasl") 278: ((SB-PCL::FAST-METHOD ASDF:PERFORM (ASDF:COMPILE-OP ASDF::IOLIB-GROVEL-FILE)) #<unused argument> #<unused argument> #<ASDF:COMPILE-OP NIL {100D625D73}> #<ASDF::IOLIB-GROVEL-FILE "iolib.sockets" "grovel">) 279: ((SB-PCL::EMF ASDF:PERFORM) #<unused argument> #<unused argument> #<ASDF:COMPILE-OP NIL {100D625D73}> #<ASDF::IOLIB-GROVEL-FILE "iolib.sockets" "grovel">) 280: ((SB-PCL::FAST-METHOD ASDF:PERFORM :AROUND (ASDF:COMPILE-OP IOLIB-GROVEL::CC-FLAGS-MIXIN)) #<unused argument> #S(SB-PCL::FAST-METHOD-CALL :FUNCTION #<CLOSURE (SB-PCL::EMF ASDF:PERFORM) {100BA31E8B}> :PV NIL :NEXT-METHOD-CALL NIL :ARG-INFO (2)) #<ASDF:COMPILE-OP NIL {100D625D73}> #<ASDF::IOLIB-GROVEL-FILE "iolib.sockets" "grovel">) 281: ((SB-PCL::FAST-METHOD ASDF:PERFORM :AROUND (ASDF:COMPILE-OP :IOLIB-MUFFLED-SOURCE-FILE)) #<unused argument> #S(SB-PCL::FAST-METHOD-CALL :FUNCTION #<FUNCTION (SB-PCL::FAST-METHOD ASDF:PERFORM :AROUND #)> :PV NIL :NEXT-METHOD-CALL #S(SB-PCL::FAST-METHOD-CALL :FUNCTION #<CLOSURE # {100BA31E8B}> :PV NIL :NEXT-METHOD-CALL NIL :ARG-INFO (2)) :ARG-INFO (2)) #<ASDF:COMPILE-OP NIL {100D625D73}> #<ASDF::IOLIB-GROVEL-FILE "iolib.sockets" "grovel">) 282: ((SB-PCL::FAST-METHOD ASDF::PERFORM-WITH-RESTARTS :AROUND (T T)) #<unavailable argument> #S(SB-PCL::FAST-METHOD-CALL :FUNCTION #<FUNCTION (SB-PCL::FAST-METHOD ASDF::PERFORM-WITH-RESTARTS #)> :PV NIL :NEXT-METHOD-CALL NIL :ARG-INFO (2)) #<ASDF:COMPILE-OP NIL {100D625D73}> #<ASDF::IOLIB-GROVEL-FILE "iolib.sockets" "grovel">) 283: ((LAMBDA NIL :IN ASDF::PERFORM-PLAN)) 284: ((FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN SB-C::%WITH-COMPILATION-UNIT)) 285: ((FLET #:WITHOUT-INTERRUPTS-BODY-88874 :IN SB-THREAD::CALL-WITH-RECURSIVE-LOCK)) 286: (SB-THREAD::CALL-WITH-RECURSIVE-LOCK #<CLOSURE (FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN SB-C::%WITH-COMPILATION-UNIT) {7FFFF481CE5B}> #<SB-THREAD:MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>>) 287: ((FLET SB-C::WITH-IT :IN SB-C::%WITH-COMPILATION-UNIT)) 288: ((SB-PCL::FAST-METHOD ASDF::PERFORM-PLAN (LIST)) #<unused argument> #<unused argument> ((#1=#<ASDF:COMPILE-OP NIL {1003BA6A83}> . #2=#<ASDF:CL-SOURCE-FILE #3="split-sequence" "split-sequence">) (#1# . #4=#<ASDF:SYSTEM #3#>) (#5=#<ASDF:LOAD-OP NIL {100D6271D3}> . #2#) (#5# . #4#) (#6=#<ASDF:COMPILE-OP NIL {100D530423}> . #7=#<ASDF:CL-SOURCE-FILE #8="idna" "package">) (#<ASDF:LOAD-OP NIL {100D627233}> . #7#) (#6# . #9=#<ASDF:CL-SOURCE-FILE #8# "encode">) (#<ASDF:LOAD-OP NIL {100D627253}> . #9#) (#6# . #10=#<ASDF:CL-SOURCE-FILE #8# "decode">) (#6# . #11=#<ASDF:SYSTEM #8#>) (#12=#<ASDF:COMPILE-OP NIL {100D6270F3}> . #13=#<ASDF:CL-SOURCE-FILE #14="bordeaux-threads" #15="src" "pkgdcl">) (#<ASDF:LOAD-OP NIL {100D627273}> . #13#) (#12# . #16=#<ASDF:CL-SOURCE-FILE #14# #15# "bordeaux-threads">) (#<ASDF:LOAD-OP NIL {100D627293}> . #16#) (#12# . #17=#<ASDF:CL-SOURCE-FILE #14# #15# "impl-sbcl">) (#<ASDF:LOAD-OP NIL {100D6272B3}> . #17#) (#12# . #18=#<ASDF:CL-SOURCE-FILE #14# #15# "default-implementations">) (#12# . #19=#<ASDF:MODULE #14# #15#>) (#12# . #20=#<ASDF:SYSTEM #14#>) (#21=#<ASDF:COMPILE-OP NIL {100D6270B3}> . #22=#<ASDF:CL-SOURCE-FILE #23="trivial-garbage" "trivial-garbage">) (#21# . #24=#<ASDF:SYSTEM #23#>) (#25=#<ASDF:COMPILE-OP NIL {100D626FB3}> . #26=#<:IOLIB-SOURCE-FILE #27="iolib.common-lisp" "conduits">) (#<ASDF:LOAD-OP NIL {100D6272D3}> . #26#) (#25# . #28=#<:IOLIB-SOURCE-FILE #27# "pkgdcl">) (#<ASDF:LOAD-OP NIL {100D6272F3}> . #28#) (#25# . #29=#<:IOLIB-SOURCE-FILE #27# "gray-streams">) (#25# . #30=#<:IOLIB-SOURCE-FILE #27# "definitions">) (#25# . #31=#<:IOLIB-SOURCE-FILE #27# "types">) (#25# . #32=#<ASDF:SYSTEM #27#>) (#33=#<ASDF:LOAD-OP NIL {100D626F33}> . #29#) (#33# . #30#) (#33# . #31#) (#33# . #32#) (#34=#<ASDF:COMPILE-OP NIL {100D626D33}> . #35=#<:IOLIB-SOURCE-FILE #36="iolib.base" "pkgdcl">) (#<ASDF:LOAD-OP NIL {100D627313}> . #35#) (#34# . #37=#<:IOLIB-SOURCE-FILE #36# "return-star">) (#<ASDF:LOAD-OP NIL {100D627333}> . #37#) (#34# . #38=#<:IOLIB-SOURCE-FILE #36# "types">) (#34# . #39=#<:IOLIB-SOURCE-FILE #36# "debug">) (#34# . #40=#<:IOLIB-SOURCE-FILE #36# "conditions">) (#34# . #41=#<:IOLIB-SOURCE-FILE #36# "defalias">) (#34# . #42=#<:IOLIB-SOURCE-FILE #36# "deffoldable">) (#34# . #43=#<:IOLIB-SOURCE-FILE #36# "defobsolete">) (#<ASDF:LOAD-OP NIL {100D627353}> . #40#) (#34# . #44=#<:IOLIB-SOURCE-FILE #36# "reader">) (#34# . #45=#<:IOLIB-SOURCE-FILE #36# "sequence">) (#34# . #46=#<:IOLIB-SOURCE-FILE #36# "matching">) (#34# . #47=#<:IOLIB-SOURCE-FILE #36# "time">) (#34# . #48=#<ASDF:SYSTEM #36#>) (#49=#<ASDF:LOAD-OP NIL {100D626BF3}> . #38#) (#49# . #39#) (#49# . #41#) (#49# . #42#) (#49# . #43#) (#49# . #44#) (#49# . #45#) (#49# . #46#) (#49# . #47#) (#49# . #48#) (#50=#<ASDF:COMPILE-OP NIL {100D6269F3}> . #51=#<:IOLIB-SOURCE-FILE #52="iolib.syscalls" "pkgdcl">) (#<ASDF:LOAD-OP NIL {100D627373}> . #51#) (#50# . #53=#<:IOLIB-SOURCE-FILE #52# "syscall-path-strings">) (#<ASDF:LOAD-OP NIL {100D627393}> . #53#) (#50# . #54=#<ASDF::IOLIB-GROVEL-FILE #52# "ffi-types">) (#<ASDF:LOAD-OP NIL {100D6273B3}> . #54#) (#50# . #55=#<:IOLIB-SOURCE-FILE #52# "conditions">) (#<ASDF:LOAD-OP NIL {100D6273D3}> . #55#) (#50# . #56=#<:IOLIB-SOURCE-FILE #52# "os-conditions">) (#<ASDF:LOAD-OP NIL {100D6273F3}> . #56#) (#50# . #57=#<:IOLIB-SOURCE-FILE #52# "designators">) (#<ASDF:LOAD-OP NIL {100D627413}> . #57#) (#50# . #58=#<:IOLIB-SOURCE-FILE #52# "early">) (#<ASDF:LOAD-OP NIL {100D627433}> . #58#) (#50# . #59=#<:IOLIB-SOURCE-FILE #52# "ffi-functions">) (#50# . #60=#<ASDF:SYSTEM #52#>) (#61=#<ASDF:LOAD-OP NIL {100D6269B3}> . #59#) (#61# . #60#) (#62=#<ASDF:COMPILE-OP NIL {100D6266F3}> . #63=#<:IOLIB-SOURCE-FILE #64="iolib.multiplex" "pkgdcl">) (#<ASDF:LOAD-OP NIL {100D627453}> . #63#) (#62# . #65=#<:IOLIB-SOURCE-FILE #64# "utils">) (#62# . #66=#<:IOLIB-SOURCE-FILE #64# "timers">) (#62# . #67=#<:IOLIB-SOURCE-FILE #64# "queue">) (#<ASDF:LOAD-OP NIL {100D627473}> . #67#) (#<ASDF:LOAD-OP NIL {100D627493}> . #66#) (#62# . #68=#<:IOLIB-SOURCE-FILE #64# "scheduler">) (#62# . #69=#<:IOLIB-SOURCE-FILE #64# "fd-entry">) (#<ASDF:LOAD-OP NIL {100D6274B3}> . #69#) (#<ASDF:LOAD-OP NIL {100D6274D3}> . #65#) (#62# . #70=#<:IOLIB-SOURCE-FILE #64# "multiplexer">) (#<ASDF:LOAD-OP NIL {100D6274F3}> . #70#) (#<ASDF:LOAD-OP NIL {100D627513}> . #68#) (#62# . #71=#<:IOLIB-SOURCE-FILE #64# "event-loop">) (#62# . #72=#<:IOLIB-SOURCE-FILE #64# "fd-wait">) (#62# . #73=#<:IOLIB-SOURCE-FILE #64# "backend-select">) (#62# . #74=#<:IOLIB-SOURCE-FILE #64# "backend-epoll">) (#<ASDF:LOAD-OP NIL {100D627533}> . #74#) (#<ASDF:LOAD-OP NIL {100D627553}> . #73#) (#62# . #75=#<:IOLIB-SOURCE-FILE #64# "detect">) (#62# . #76=#<ASDF:SYSTEM #64#>) (#77=#<ASDF:LOAD-OP NIL {100D6266B3}> . #22#) (#77# . #24#) (#78=#<ASDF:LOAD-OP NIL {100D626633}> . #71#) (#78# . #72#) (#78# . #75#) (#78# . #76#) (#79=#<ASDF:COMPILE-OP NIL {100D626473}> . #80=#<:IOLIB-SOURCE-FILE #81="iolib.streams" "pkgdcl">) (#<ASDF:LOAD-OP NIL {100D627573}> . #80#) (#79# . #82=#<:IOLIB-SOURCE-FILE #81# "classes">) (#79# . #83=#<:IOLIB-SOURCE-FILE #81# "conditions">) (#<ASDF:LOAD-OP NIL {100D627593}> . #82#) (#79# . #84=#<:IOLIB-SOURCE-FILE #81# "buffer">) (#79# . #85=#<:IOLIB-SOURCE-FILE #81# "fd-mixin">) (#<ASDF:LOAD-OP NIL {100D6275B3}> . #85#) (#<ASDF:LOAD-OP NIL {100D6275D3}> . #84#) (#<ASDF:LOAD-OP NIL {100D6275F3}> . #83#) (#79# . #86=#<:IOLIB-SOURCE-FILE #81# "io-helpers">) (#<ASDF:LOAD-OP NIL {100D627613}> . #86#) (#79# . #87=#<:IOLIB-SOURCE-FILE #81# "gray-stream-methods">) (#79# . #88=#<ASDF:SYSTEM #81#>) (#89=#<ASDF:LOAD-OP NIL {100D626433}> . #10#) (#89# . #11#) (#90=#<ASDF:LOAD-OP NIL {100D6263F3}> . #18#) (#90# . #19#) (#90# . #20#) (#91=#<ASDF:LOAD-OP NIL {100D6263B3}> . #87#) (#91# . #88#) (#92=#<ASDF:COMPILE-OP NIL {100D625D73}> . #93=#<:IOLIB-SOURCE-FILE #94="iolib.sockets" "pkgdcl">) (#<ASDF:LOAD-OP NIL {100D627633}> . #93#) (#92# . #95=#<ASDF::IOLIB-GROVEL-FILE #94# "grovel">) (#<ASDF:LOAD-OP NIL {100D627653}> . #95#) (#92# . #96=#<:IOLIB-SOURCE-FILE #94# "conditions">) (#<ASDF:LOAD-OP NIL {100D627673}> . #96#) (#92# . #97=#<:IOLIB-SOURCE-FILE #94# "bsd">) (#<ASDF:LOAD-OP NIL {100D627693}> . #97#) (#92# . #98=#<:IOLIB-SOURCE-FILE #94# "common">) (#92# . #99=#<:IOLIB-SOURCE-FILE #94# "config">) (#<ASDF:LOAD-OP NIL {100D6276B3}> . #98#) (#92# . #100=#<:IOLIB-SOURCE-FILE #94# "iface">) (#92# . #101=#<:IOLIB-SOURCE-FILE #94# "address">) (#<ASDF:LOAD-OP NIL {100D6276D3}> . #101#) (#92# . #102=#<:IOLIB-SOURCE-FILE #94# "address-predicates">) (#<ASDF:LOAD-OP NIL {100D6276F3}> . #102#) (#92# . #103=#<:IOLIB-SOURCE-FILE #94# "address-arithmetic">) (#<ASDF:LOAD-OP NIL {100D627713}> . #99#) (#92# . #104=#<:IOLIB-SOURCE-FILE #94# "base-sockets">) (#<ASDF:LOAD-OP NIL {100D627733}> . #104#) (#92# . #105=#<:IOLIB-SOURCE-FILE #94# "socket-options">) (#92# . #106=#<:IOLIB-SOURCE-FILE #94# "etc-files">) (#92# . #107=#<:IOLIB-SOURCE-FILE #94# "file-monitor">) (#<ASDF:LOAD-OP NIL {100D627753}> . #107#) (#<ASDF:LOAD-OP NIL {100D627773}> . #106#) (#92# . #108=#<:IOLIB-SOURCE-FILE #94# "protocols">) (#92# . #109=#<:IOLIB-SOURCE-FILE #94# "services">) (#92# . #110=#<:IOLIB-SOURCE-FILE #94# "hosts">) (#<ASDF:LOAD-OP NIL {100D627793}> . #109#) (#<ASDF:LOAD-OP NIL {100D6277B3}> . #108#) (#<ASDF:LOAD-OP NIL {100D6277D3}> . #105#) (#92# . #111=#<:IOLIB-SOURCE-FILE #94# "socket-methods">) (#<ASDF:LOAD-OP NIL {100D6277F3}> . #111#) (#92# . #112=#<:IOLIB-SOURCE-FILE #94# "make-socket">) (#92# . #113=#<:IOLIB-SOURCE-FILE #94# "dns-common">) (#92# . #114=#<:IOLIB-SOURCE-FILE #94# "nameservers">) (#92# . #115=#<:IOLIB-SOURCE-FILE #94# "dynamic-buffer">) (#<ASDF:LOAD-OP NIL {100D627813}> . #115#) (#<ASDF:LOAD-OP NIL {100D627833}> . #113#) (#92# . #116=#<:IOLIB-SOURCE-FILE #94# "message">) (#<ASDF:LOAD-OP NIL {100D627853}> . #116#) (#<ASDF:LOAD-OP NIL {100D627873}> . #114#) (#<ASDF:LOAD-OP NIL {100D627893}> . #112#) (#92# . #117=#<:IOLIB-SOURCE-FILE #94# "query">) (#92# . #118=#<:IOLIB-SOURCE-FILE #94# "dns-conditions">) (#<ASDF:LOAD-OP NIL {100D6278B3}> . #118#) (#<ASDF:LOAD-OP NIL {100D6278D3}> . #117#) (#<ASDF:LOAD-OP NIL {100D6278F3}> . #110#) (#92# . #119=#<:IOLIB-SOURCE-FILE #94# "lookup">) (#92# . #120=#<ASDF:SYSTEM #94#>) (#121=#<ASDF:LOAD-OP NIL {100D625CF3}> . #100#) (#121# . #103#) (#121# . #119#) (#121# . #120#) (#122=#<ASDF:COMPILE-OP NIL {1004485273}> . #123=#<:IOLIB-SOURCE-FILE #124="iolib" "pkgdcl">) (#122# . #125=#<ASDF:SYSTEM #124#>) (#126=#<ASDF:LOAD-OP NIL {10038A4703}> . #123#) (#126# . #125#))) 289: ((SB-PCL::EMF ASDF::PERFORM-PLAN) #<unused argument> #<unused argument> ((#1=#<ASDF:COMPILE-OP NIL {1003BA6A83}> . #2=#<ASDF:CL-SOURCE-FILE #3="split-sequence" "split-sequence">) (#1# . #4=#<ASDF:SYSTEM #3#>) (#5=#<ASDF:LOAD-OP NIL {100D6271D3}> . #2#) (#5# . #4#) (#6=#<ASDF:COMPILE-OP NIL {100D530423}> . #7=#<ASDF:CL-SOURCE-FILE #8="idna" "package">) (#<ASDF:LOAD-OP NIL {100D627233}> . #7#) (#6# . #9=#<ASDF:CL-SOURCE-FILE #8# "encode">) (#<ASDF:LOAD-OP NIL {100D627253}> . #9#) (#6# . #10=#<ASDF:CL-SOURCE-FILE #8# "decode">) (#6# . #11=#<ASDF:SYSTEM #8#>) (#12=#<ASDF:COMPILE-OP NIL {100D6270F3}> . #13=#<ASDF:CL-SOURCE-FILE #14="bordeaux-threads" #15="src" "pkgdcl">) (#<ASDF:LOAD-OP NIL {100D627273}> . #13#) (#12# . #16=#<ASDF:CL-SOURCE-FILE #14# #15# "bordeaux-threads">) (#<ASDF:LOAD-OP NIL {100D627293}> . #16#) (#12# . #17=#<ASDF:CL-SOURCE-FILE #14# #15# "impl-sbcl">) (#<ASDF:LOAD-OP NIL {100D6272B3}> . #17#) (#12# . #18=#<ASDF:CL-SOURCE-FILE #14# #15# "default-implementations">) (#12# . #19=#<ASDF:MODULE #14# #15#>) (#12# . #20=#<ASDF:SYSTEM #14#>) (#21=#<ASDF:COMPILE-OP NIL {100D6270B3}> . #22=#<ASDF:CL-SOURCE-FILE #23="trivial-garbage" "trivial-garbage">) (#21# . #24=#<ASDF:SYSTEM #23#>) (#25=#<ASDF:COMPILE-OP NIL {100D626FB3}> . #26=#<:IOLIB-SOURCE-FILE #27="iolib.common-lisp" "conduits">) (#<ASDF:LOAD-OP NIL {100D6272D3}> . #26#) (#25# . #28=#<:IOLIB-SOURCE-FILE #27# "pkgdcl">) (#<ASDF:LOAD-OP NIL {100D6272F3}> . #28#) (#25# . #29=#<:IOLIB-SOURCE-FILE #27# "gray-streams">) (#25# . #30=#<:IOLIB-SOURCE-FILE #27# "definitions">) (#25# . #31=#<:IOLIB-SOURCE-FILE #27# "types">) (#25# . #32=#<ASDF:SYSTEM #27#>) (#33=#<ASDF:LOAD-OP NIL {100D626F33}> . #29#) (#33# . #30#) (#33# . #31#) (#33# . #32#) (#34=#<ASDF:COMPILE-OP NIL {100D626D33}> . #35=#<:IOLIB-SOURCE-FILE #36="iolib.base" "pkgdcl">) (#<ASDF:LOAD-OP NIL {100D627313}> . #35#) (#34# . #37=#<:IOLIB-SOURCE-FILE #36# "return-star">) (#<ASDF:LOAD-OP NIL {100D627333}> . #37#) (#34# . #38=#<:IOLIB-SOURCE-FILE #36# "types">) (#34# . #39=#<:IOLIB-SOURCE-FILE #36# "debug">) (#34# . #40=#<:IOLIB-SOURCE-FILE #36# "conditions">) (#34# . #41=#<:IOLIB-SOURCE-FILE #36# "defalias">) (#34# . #42=#<:IOLIB-SOURCE-FILE #36# "deffoldable">) (#34# . #43=#<:IOLIB-SOURCE-FILE #36# "defobsolete">) (#<ASDF:LOAD-OP NIL {100D627353}> . #40#) (#34# . #44=#<:IOLIB-SOURCE-FILE #36# "reader">) (#34# . #45=#<:IOLIB-SOURCE-FILE #36# "sequence">) (#34# . #46=#<:IOLIB-SOURCE-FILE #36# "matching">) (#34# . #47=#<:IOLIB-SOURCE-FILE #36# "time">) (#34# . #48=#<ASDF:SYSTEM #36#>) (#49=#<ASDF:LOAD-OP NIL {100D626BF3}> . #38#) (#49# . #39#) (#49# . #41#) (#49# . #42#) (#49# . #43#) (#49# . #44#) (#49# . #45#) (#49# . #46#) (#49# . #47#) (#49# . #48#) (#50=#<ASDF:COMPILE-OP NIL {100D6269F3}> . #51=#<:IOLIB-SOURCE-FILE #52="iolib.syscalls" "pkgdcl">) (#<ASDF:LOAD-OP NIL {100D627373}> . #51#) (#50# . #53=#<:IOLIB-SOURCE-FILE #52# "syscall-path-strings">) (#<ASDF:LOAD-OP NIL {100D627393}> . #53#) (#50# . #54=#<ASDF::IOLIB-GROVEL-FILE #52# "ffi-types">) (#<ASDF:LOAD-OP NIL {100D6273B3}> . #54#) (#50# . #55=#<:IOLIB-SOURCE-FILE #52# "conditions">) (#<ASDF:LOAD-OP NIL {100D6273D3}> . #55#) (#50# . #56=#<:IOLIB-SOURCE-FILE #52# "os-conditions">) (#<ASDF:LOAD-OP NIL {100D6273F3}> . #56#) (#50# . #57=#<:IOLIB-SOURCE-FILE #52# "designators">) (#<ASDF:LOAD-OP NIL {100D627413}> . #57#) (#50# . #58=#<:IOLIB-SOURCE-FILE #52# "early">) (#<ASDF:LOAD-OP NIL {100D627433}> . #58#) (#50# . #59=#<:IOLIB-SOURCE-FILE #52# "ffi-functions">) (#50# . #60=#<ASDF:SYSTEM #52#>) (#61=#<ASDF:LOAD-OP NIL {100D6269B3}> . #59#) (#61# . #60#) (#62=#<ASDF:COMPILE-OP NIL {100D6266F3}> . #63=#<:IOLIB-SOURCE-FILE #64="iolib.multiplex" "pkgdcl">) (#<ASDF:LOAD-OP NIL {100D627453}> . #63#) (#62# . #65=#<:IOLIB-SOURCE-FILE #64# "utils">) (#62# . #66=#<:IOLIB-SOURCE-FILE #64# "timers">) (#62# . #67=#<:IOLIB-SOURCE-FILE #64# "queue">) (#<ASDF:LOAD-OP NIL {100D627473}> . #67#) (#<ASDF:LOAD-OP NIL {100D627493}> . #66#) (#62# . #68=#<:IOLIB-SOURCE-FILE #64# "scheduler">) (#62# . #69=#<:IOLIB-SOURCE-FILE #64# "fd-entry">) (#<ASDF:LOAD-OP NIL {100D6274B3}> . #69#) (#<ASDF:LOAD-OP NIL {100D6274D3}> . #65#) (#62# . #70=#<:IOLIB-SOURCE-FILE #64# "multiplexer">) (#<ASDF:LOAD-OP NIL {100D6274F3}> . #70#) (#<ASDF:LOAD-OP NIL {100D627513}> . #68#) (#62# . #71=#<:IOLIB-SOURCE-FILE #64# "event-loop">) (#62# . #72=#<:IOLIB-SOURCE-FILE #64# "fd-wait">) (#62# . #73=#<:IOLIB-SOURCE-FILE #64# "backend-select">) (#62# . #74=#<:IOLIB-SOURCE-FILE #64# "backend-epoll">) (#<ASDF:LOAD-OP NIL {100D627533}> . #74#) (#<ASDF:LOAD-OP NIL {100D627553}> . #73#) (#62# . #75=#<:IOLIB-SOURCE-FILE #64# "detect">) (#62# . #76=#<ASDF:SYSTEM #64#>) (#77=#<ASDF:LOAD-OP NIL {100D6266B3}> . #22#) (#77# . #24#) (#78=#<ASDF:LOAD-OP NIL {100D626633}> . #71#) (#78# . #72#) (#78# . #75#) (#78# . #76#) (#79=#<ASDF:COMPILE-OP NIL {100D626473}> . #80=#<:IOLIB-SOURCE-FILE #81="iolib.streams" "pkgdcl">) (#<ASDF:LOAD-OP NIL {100D627573}> . #80#) (#79# . #82=#<:IOLIB-SOURCE-FILE #81# "classes">) (#79# . #83=#<:IOLIB-SOURCE-FILE #81# "conditions">) (#<ASDF:LOAD-OP NIL {100D627593}> . #82#) (#79# . #84=#<:IOLIB-SOURCE-FILE #81# "buffer">) (#79# . #85=#<:IOLIB-SOURCE-FILE #81# "fd-mixin">) (#<ASDF:LOAD-OP NIL {100D6275B3}> . #85#) (#<ASDF:LOAD-OP NIL {100D6275D3}> . #84#) (#<ASDF:LOAD-OP NIL {100D6275F3}> . #83#) (#79# . #86=#<:IOLIB-SOURCE-FILE #81# "io-helpers">) (#<ASDF:LOAD-OP NIL {100D627613}> . #86#) (#79# . #87=#<:IOLIB-SOURCE-FILE #81# "gray-stream-methods">) (#79# . #88=#<ASDF:SYSTEM #81#>) (#89=#<ASDF:LOAD-OP NIL {100D626433}> . #10#) (#89# . #11#) (#90=#<ASDF:LOAD-OP NIL {100D6263F3}> . #18#) (#90# . #19#) (#90# . #20#) (#91=#<ASDF:LOAD-OP NIL {100D6263B3}> . #87#) (#91# . #88#) (#92=#<ASDF:COMPILE-OP NIL {100D625D73}> . #93=#<:IOLIB-SOURCE-FILE #94="iolib.sockets" "pkgdcl">) (#<ASDF:LOAD-OP NIL {100D627633}> . #93#) (#92# . #95=#<ASDF::IOLIB-GROVEL-FILE #94# "grovel">) (#<ASDF:LOAD-OP NIL {100D627653}> . #95#) (#92# . #96=#<:IOLIB-SOURCE-FILE #94# "conditions">) (#<ASDF:LOAD-OP NIL {100D627673}> . #96#) (#92# . #97=#<:IOLIB-SOURCE-FILE #94# "bsd">) (#<ASDF:LOAD-OP NIL {100D627693}> . #97#) (#92# . #98=#<:IOLIB-SOURCE-FILE #94# "common">) (#92# . #99=#<:IOLIB-SOURCE-FILE #94# "config">) (#<ASDF:LOAD-OP NIL {100D6276B3}> . #98#) (#92# . #100=#<:IOLIB-SOURCE-FILE #94# "iface">) (#92# . #101=#<:IOLIB-SOURCE-FILE #94# "address">) (#<ASDF:LOAD-OP NIL {100D6276D3}> . #101#) (#92# . #102=#<:IOLIB-SOURCE-FILE #94# "address-predicates">) (#<ASDF:LOAD-OP NIL {100D6276F3}> . #102#) (#92# . #103=#<:IOLIB-SOURCE-FILE #94# "address-arithmetic">) (#<ASDF:LOAD-OP NIL {100D627713}> . #99#) (#92# . #104=#<:IOLIB-SOURCE-FILE #94# "base-sockets">) (#<ASDF:LOAD-OP NIL {100D627733}> . #104#) (#92# . #105=#<:IOLIB-SOURCE-FILE #94# "socket-options">) (#92# . #106=#<:IOLIB-SOURCE-FILE #94# "etc-files">) (#92# . #107=#<:IOLIB-SOURCE-FILE #94# "file-monitor">) (#<ASDF:LOAD-OP NIL {100D627753}> . #107#) (#<ASDF:LOAD-OP NIL {100D627773}> . #106#) (#92# . #108=#<:IOLIB-SOURCE-FILE #94# "protocols">) (#92# . #109=#<:IOLIB-SOURCE-FILE #94# "services">) (#92# . #110=#<:IOLIB-SOURCE-FILE #94# "hosts">) (#<ASDF:LOAD-OP NIL {100D627793}> . #109#) (#<ASDF:LOAD-OP NIL {100D6277B3}> . #108#) (#<ASDF:LOAD-OP NIL {100D6277D3}> . #105#) (#92# . #111=#<:IOLIB-SOURCE-FILE #94# "socket-methods">) (#<ASDF:LOAD-OP NIL {100D6277F3}> . #111#) (#92# . #112=#<:IOLIB-SOURCE-FILE #94# "make-socket">) (#92# . #113=#<:IOLIB-SOURCE-FILE #94# "dns-common">) (#92# . #114=#<:IOLIB-SOURCE-FILE #94# "nameservers">) (#92# . #115=#<:IOLIB-SOURCE-FILE #94# "dynamic-buffer">) (#<ASDF:LOAD-OP NIL {100D627813}> . #115#) (#<ASDF:LOAD-OP NIL {100D627833}> . #113#) (#92# . #116=#<:IOLIB-SOURCE-FILE #94# "message">) (#<ASDF:LOAD-OP NIL {100D627853}> . #116#) (#<ASDF:LOAD-OP NIL {100D627873}> . #114#) (#<ASDF:LOAD-OP NIL {100D627893}> . #112#) (#92# . #117=#<:IOLIB-SOURCE-FILE #94# "query">) (#92# . #118=#<:IOLIB-SOURCE-FILE #94# "dns-conditions">) (#<ASDF:LOAD-OP NIL {100D6278B3}> . #118#) (#<ASDF:LOAD-OP NIL {100D6278D3}> . #117#) (#<ASDF:LOAD-OP NIL {100D6278F3}> . #110#) (#92# . #119=#<:IOLIB-SOURCE-FILE #94# "lookup">) (#92# . #120=#<ASDF:SYSTEM #94#>) (#121=#<ASDF:LOAD-OP NIL {100D625CF3}> . #100#) (#121# . #103#) (#121# . #119#) (#121# . #120#) (#122=#<ASDF:COMPILE-OP NIL {1004485273}> . #123=#<:IOLIB-SOURCE-FILE #124="iolib" "pkgdcl">) (#122# . #125=#<ASDF:SYSTEM #124#>) (#126=#<ASDF:LOAD-OP NIL {10038A4703}> . #123#) (#126# . #125#))) 290: ((LAMBDA NIL :IN ASDF:OPERATE)) 291: (ASDF::CALL-WITH-SYSTEM-DEFINITIONS #<CLOSURE (LAMBDA NIL :IN ASDF:OPERATE) {10038A424B}>) 292: ((SB-PCL::FAST-METHOD ASDF:OPERATE (T T)) #<unused argument> #<unused argument> ASDF:LOAD-OP "iolib") 293: ((SB-PCL::EMF ASDF:OPERATE) #<unused argument> #<unused argument> ASDF:LOAD-OP "iolib") 294: ((LAMBDA (SB-PCL::.ARG0. SB-PCL::.ARG1. SB-INT:&MORE SB-PCL::.MORE-CONTEXT. SB-PCL::.MORE-COUNT.) :IN "/home/hechee/lisp/quicklisp/setup.lisp") ASDF:LOAD-OP "iolib") 295: ((FLET #:BODY-FN-158 :IN SWANK::OPERATE-ON-SYSTEM)) 296: ((LAMBDA NIL :IN SWANK::OPERATE-ON-SYSTEM)) 297: ((FLET SWANK-BACKEND:CALL-WITH-COMPILATION-HOOKS :IN "/home/hechee/lisp/src/slime-pkg/swank.2012-03-10-01:53:57/swank-sbcl.lisp") #<CLOSURE (LAMBDA NIL :IN SWANK::OPERATE-ON-SYSTEM) {10038A419B}>) 298: (SWANK-BACKEND:CALL-WITH-COMPILATION-HOOKS #<CLOSURE (LAMBDA NIL :IN SWANK::OPERATE-ON-SYSTEM) {10038A419B}>) 299: ((FLET #:FORM-FUN-157 :IN SWANK::OPERATE-ON-SYSTEM)) 300: (SWANK::OPERATE-ON-SYSTEM "iolib" SWANK-IO-PACKAGE::LOAD-OP) 301: ((LAMBDA NIL :IN SWANK:OPERATE-ON-SYSTEM-FOR-EMACS)) 302: ((LAMBDA NIL :IN SWANK::COLLECT-NOTES)) 303: (SWANK::MEASURE-TIME-INTERVAL #<CLOSURE (LAMBDA NIL :IN SWANK::COLLECT-NOTES) {10038A40DB}>) 304: (SWANK::COLLECT-NOTES #<CLOSURE (LAMBDA NIL :IN SWANK:OPERATE-ON-SYSTEM-FOR-EMACS) {10038A40AB}>) 305: (SWANK:OPERATE-ON-SYSTEM-FOR-EMACS "iolib" SWANK-IO-PACKAGE::LOAD-OP) 306: (SB-INT:SIMPLE-EVAL-IN-LEXENV (SWANK:OPERATE-ON-SYSTEM-FOR-EMACS "iolib" (QUOTE SWANK-IO-PACKAGE::LOAD-OP)) #<NULL-LEXENV>) 307: (EVAL (SWANK:OPERATE-ON-SYSTEM-FOR-EMACS "iolib" (QUOTE SWANK-IO-PACKAGE::LOAD-OP))) 308: (SWANK:EVAL-FOR-EMACS (SWANK:OPERATE-ON-SYSTEM-FOR-EMACS "iolib" (QUOTE SWANK-IO-PACKAGE::LOAD-OP)) "HECHEE-USER" 20) 309: (SWANK::PROCESS-REQUESTS NIL) 310: ((LAMBDA NIL :IN SWANK::HANDLE-REQUESTS)) 311: ((LAMBDA NIL :IN SWANK::HANDLE-REQUESTS)) 312: (SWANK-BACKEND::CALL-WITH-BREAK-HOOK #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK> #<CLOSURE (LAMBDA NIL :IN SWANK::HANDLE-REQUESTS) {1003B5010B}>) 313: ((FLET SWANK-BACKEND:CALL-WITH-DEBUGGER-HOOK :IN "/home/hechee/lisp/src/slime-pkg/swank.2012-03-10-01:53:57/swank-sbcl.lisp") #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK> #<CLOSURE (LAMBDA NIL :IN SWANK::HANDLE-REQUESTS) {1003B5010B}>) 314: (SWANK-BACKEND:CALL-WITH-DEBUGGER-HOOK #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK> #<CLOSURE (LAMBDA NIL :IN SWANK::HANDLE-REQUESTS) {1003B5010B}>) 315: ((LAMBDA NIL :IN SWANK::HANDLE-REQUESTS)) 316: (SWANK::CALL-WITH-BINDINGS ((*STANDARD-OUTPUT* . #1=#<SWANK-BACKEND::SLIME-OUTPUT-STREAM {1003B147A3}>) (*STANDARD-INPUT* . #2=#<SWANK-BACKEND::SLIME-INPUT-STREAM {10029F0083}>) (*TRACE-OUTPUT* . #1#) (*ERROR-OUTPUT* . #1#) (*DEBUG-IO* . #3=#<TWO-WAY-STREAM :INPUT-STREAM #2# :OUTPUT-STREAM #1#>) (*QUERY-IO* . #3#) (*TERMINAL-IO* . #3#)) #<CLOSURE (LAMBDA NIL :IN SWANK::HANDLE-REQUESTS) {1003B5012B}>) 317: ((FLET #:FORM-FUN-1788 :IN SWANK::HANDLE-REQUESTS)) 318: (SWANK::HANDLE-REQUESTS #<SWANK::MULTITHREADED-CONNECTION {100537B353}> NIL) 319: (SWANK::REPL-LOOP #<SWANK::MULTITHREADED-CONNECTION {100537B353}>) 320: ((LAMBDA NIL :IN SWANK::SPAWN-REPL-THREAD)) 321: (SWANK::CALL-WITH-BINDINGS NIL #<CLOSURE (LAMBDA NIL :IN SWANK::SPAWN-REPL-THREAD) {1003B500EB}>) 322: ((LAMBDA NIL :IN SWANK::SPAWN-REPL-THREAD)) 323: ((FLET #:WITHOUT-INTERRUPTS-BODY-237357 :IN SB-THREAD:MAKE-THREAD)) 324: ((FLET SB-THREAD::WITH-MUTEX-THUNK :IN SB-THREAD:MAKE-THREAD)) 325: ((FLET #:WITHOUT-INTERRUPTS-BODY-88845 :IN SB-THREAD::CALL-WITH-MUTEX)) 326: (SB-THREAD::CALL-WITH-MUTEX #<CLOSURE (FLET SB-THREAD::WITH-MUTEX-THUNK :IN SB-THREAD:MAKE-THREAD) {7FFFF481ECEB}> #<SB-THREAD:MUTEX "thread result lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}>> #<SB-THREAD:THREAD "repl-thread" RUNNING {1003B3B603}> T) 327: (SB-THREAD::INITIAL-THREAD-FUNCTION) 328: ("foreign function: call_into_lisp") 329: ("foreign function: new_thread_trampoline") ; ; compilation unit aborted ; caught 1 fatal ERROR condition -- Stelian Ionescu a.k.a. fe[nl]ix Quidquid latine dictum sit, altum videtur. http://common-lisp.net/project/iolib

3 4

[slime-devel] Daily ChangeLog diff
by Helmut Eller 20 Apr '12

20 Apr '12

Index: slime/contrib/ChangeLog diff -u slime/contrib/ChangeLog:1.545 slime/contrib/ChangeLog:1.546 --- slime/contrib/ChangeLog:1.545 Fri Apr 13 09:16:11 2012 +++ slime/contrib/ChangeLog Thu Apr 19 22:54:21 2012 @@ -1,3 +1,10 @@ +2012-04-20 John Smith <ohwoeowho(a)googlemail.com> + + Prettier arglists. + + * swank-mit-scheme.scm (swank:operator-arglist): Remove trailing + newlines. + 2012-04-13 Nikodemus Siivola <nikodemus(a)random-state.net> * slime-cl-indent.el (lisp-indent-259): If we are expecting a

1 0

[slime-devel] small change to swank-mit-scheme.scm
by John Smith 20 Apr '12

20 Apr '12

Dear slime-devel, I've been bugged for a while that slime-show-arglist outputs two lines for mit-scheme, it makes the display twitch. I attach a small patch. regards, John

2 1

[slime-devel] Daily ChangeLog diff
by Helmut Eller 14 Apr '12

14 Apr '12

Index: slime/contrib/ChangeLog diff -u slime/contrib/ChangeLog:1.542 slime/contrib/ChangeLog:1.545 --- slime/contrib/ChangeLog:1.542 Sat Apr 7 03:23:39 2012 +++ slime/contrib/ChangeLog Fri Apr 13 09:16:11 2012 @@ -1,3 +1,24 @@ +2012-04-13 Nikodemus Siivola <nikodemus(a)random-state.net> + + * slime-cl-indent.el (lisp-indent-259): If we are expecting a + lambda-list, but don't have a list in the position, indent as if + it was &body instead. + * slime-cl-indent-test.txt (Test 89-90): Tests. + +2012-04-13 Nikodemus Siivola <nikodemus(a)random-state.net> + + * slime-cl-indent.el (common-lisp-lambda-list-initial-value-form-p): + Handle &AUX as well, and don't signal an error if the we don't + have a list where expected. + * slime-cl-indent-test.txt (Test 88): Test for indenting &AUX value + form. + +2012-04-13 Nikodemus Siivola <nikodemus(a)random-state.net> + + Wrap long lines. + + * slime-cl-indent.el + 2012-04-06 Stas Boukarev <stassats(a)gmail.com> * swank-fancy-inspector.lisp (format-iso8601-time): Add 1 to the

1 0

[slime-devel] Daily ChangeLog diff
by Helmut Eller 12 Apr '12

12 Apr '12

Index: slime/ChangeLog diff -u slime/ChangeLog:1.2315 slime/ChangeLog:1.2316 --- slime/ChangeLog:1.2315 Tue Apr 10 10:52:57 2012 +++ slime/ChangeLog Wed Apr 11 04:38:56 2012 @@ -1,3 +1,8 @@ +2012-04-11 Helmut Eller <heller(a)common-lisp.net> + + * slime.el ([test] utf-8-source): Use the encoded byte sequence of + the Unicode string. + 2012-04-10 Stas Boukarev <stassats(a)gmail.com> * slime.el (def-slime-test utf-8-source): Define only when

3 2

[slime-devel] Daily ChangeLog diff
by Helmut Eller 11 Apr '12

11 Apr '12

Index: slime/ChangeLog diff -u slime/ChangeLog:1.2313 slime/ChangeLog:1.2315 --- slime/ChangeLog:1.2313 Mon Apr 9 06:50:04 2012 +++ slime/ChangeLog Tue Apr 10 10:52:57 2012 @@ -1,3 +1,13 @@ +2012-04-10 Stas Boukarev <stassats(a)gmail.com> + + * slime.el (def-slime-test utf-8-source): Define only when + (and (featurep 'emacs) (>= emacs-major-version 23)). + +2012-04-10 Stas Boukarev <stassats(a)gmail.com> + + * slime.el (def-slime-test utf-8-source): Another try at fixing + utf8 literals in code. + 2012-04-09 Stas Boukarev <stassats(a)gmail.com> * slime.el (def-slime-test utf-8-source): Remove literal Unicode

1 0

[slime-devel] Daily ChangeLog diff
by Helmut Eller 10 Apr '12

10 Apr '12

Index: slime/ChangeLog diff -u slime/ChangeLog:1.2311 slime/ChangeLog:1.2312 --- slime/ChangeLog:1.2311 Sat Apr 7 02:35:42 2012 +++ slime/ChangeLog Sat Apr 7 03:23:38 2012 @@ -7,6 +7,19 @@ * ChangeLog: * swank-cmucl.lisp: * swank-lispworks.lisp: + * contrib/ChangeLog + * hyperspec.el + * metering.lisp + * swank-abcl.lisp + * swank-allegro.lisp + * swank-backend.lisp + * swank-clisp.lisp + * swank-corman.lisp + * swank-ecl.lisp + * swank-sbcl.lisp + * swank-scl.lisp + * swank-source-path-parser.lisp + * xref.lisp 2012-04-06 Stas Boukarev <stassats(a)gmail.com> Index: slime/contrib/ChangeLog diff -u slime/contrib/ChangeLog:1.541 slime/contrib/ChangeLog:1.542 --- slime/contrib/ChangeLog:1.541 Fri Apr 6 11:08:30 2012 +++ slime/contrib/ChangeLog Sat Apr 7 03:23:39 2012 @@ -5,12 +5,14 @@ 2012-04-04 Nikodemus Siivola <nikodemus(a)random-state.net> - * slime-cl-indent.el (common-lisp-lambda-list-initial-value-form-p): New function. - Identifies initial-value-forms from lambda-lists, allowing them to be indented - as regular code. - (lisp-indent-259): Use the previous when indenting using &lambda to punt to - normal indentation when approriate. - * slime-cl-indent-test.txt (Test 87): Test indentation of initial-value forms. + * slime-cl-indent.el + (common-lisp-lambda-list-initial-value-form-p): New function. + Identifies initial-value-forms from lambda-lists, allowing them to + be indented as regular code. + (lisp-indent-259): Use the previous when indenting using &lambda + to punt to normal indentation when approriate. + * slime-cl-indent-test.txt (Test 87): Test indentation of + initial-value forms. 2012-03-19 Stas Boukarev <stassats(a)gmail.com> @@ -59,27 +61,29 @@ 2012-03-30 Nikodemus Siivola <nikodemus(a)random-state.net> - * slime-cl-indent.el (common-lisp-indent-function-1): Fix indentation - of (and ;; Foo\n...). Previously following lines were indented by one, instead - of using normal indentation. + * slime-cl-indent.el (common-lisp-indent-function-1): Fix + indentation of (and ;; Foo\n...). Previously following lines were + indented by one, instead of using normal indentation. * slime-cl-indent-test.txt (tests 84-86): Tests. 2011-12-30 Nikodemus Siivola <nikodemus(a)random-state.net> - * slime-cl-indent.el (common-lisp-looking-at-keyword): New function. Looks - past #+foo expressions. + * slime-cl-indent.el (common-lisp-looking-at-keyword): New + function. Looks past #+foo expressions. (common-lisp-backward-keyword-argument): New function. Semi-aware of #+foo expressions. (common-lisp-indent-function-1): 1. Use `common-lisp-indent-parse-state-start'. - 2. Move #+/- cleavernes outside the cond: it is always a default, and shouldn't - trump other indentation logic. Also make it use the column of the first feature - expression, not the last. + 2. Move #+/- cleavernes outside the cond: it is always a default, + and shouldn't trump other indentation logic. Also make it use the + column of the first feature expression, not the last. 3. Make keyword alignment somewhat feature-expression aware. - 4. Make heuristics not force remaining forms to be indented at the same line. - (common-lisp-indent-test): Leave one leading whitespace on comment lines - when messing up indentation. + 4. Make heuristics not force remaining forms to be indented + at the same line. + + (common-lisp-indent-test): Leave one leading whitespace on comment + lines when messing up indentation. * slime-cl-indent-test.txt (tests 77-83): Tests for feature-expression and keyword alignment interaction. @@ -120,8 +124,9 @@ * slime-cl-indent-test.txt (tests 72-76): New tests. - * slime-cl-indent.el (common-lisp-init-standard-indentation): New function, - wraps initialization of the common-lisp-indent-function properties. + * slime-cl-indent.el (common-lisp-init-standard-indentation): New + function, wraps initialization of the common-lisp-indent-function + properties. 2011-12-06 Didier Verna <didier(a)xemacs.org> @@ -232,12 +237,13 @@ 2011-11-19 Nikodemus Siivola <nikodemus(a)random-state.net> - * slime-cl-indent.el ("sbcl"): Add indentation alias for !def-debug-command. + * slime-cl-indent.el ("sbcl"): Add indentation alias for + !def-debug-command. 2011-11-16 Stas Boukarev <stassats(a)gmail.com> - * slime-repl.el (slime-open-stream-to-lisp): Set the process coding system - to the right coding system. + * slime-repl.el (slime-open-stream-to-lisp): Set the process + coding system to the right coding system. 2011-11-12 Nikodemus Siivola <nikodemus(a)random-state.net> @@ -247,7 +253,8 @@ * slime-cl-indent.el (lisp-beginning-of-defmethod-qualifiers): Renamed from `lisp-beginning-of-defmethod'. Skip the method name as well, since unlike qualifiers it can be list -- eg. (setf foo). - (lisp-indent-defmethod): Use the above to get the number of skips right. + (lisp-indent-defmethod): Use the above to get the number of skips + right. * slime-cl-indent-test.txt: Tests 64 and 65. @@ -280,7 +287,8 @@ 2011-10-31 Nikodemus Siivola <nikodemus(a)random-state.net> - * slime-cl-indent.el (style "sbcl"): Indentation for !DEF-TYPE-TRANSLATOR. + * slime-cl-indent.el (style "sbcl"): Indentation for + !DEF-TYPE-TRANSLATOR. 2011-10-29 Nikodemus Siivola <nikodemus(a)random-state.net> @@ -305,8 +313,8 @@ 2011-10-05 Stas Boukarev <stassats(a)gmail.com> - * slime-repl.el (slime-clear-repl-variables): New function, clears *, /, - and + variables. + * slime-repl.el (slime-clear-repl-variables): New function, clears + *, /, and + variables. (slime-repl-clear-buffer-hook): Add `slime-clear-repl-variables' to it, now C-c M-o clears variables, allowing bound objects to be GCed. @@ -352,8 +360,8 @@ 2011-08-30 Nikodemus Siivola <nikodemus(a)random-state.net> - * slime-repl.el (slime-repl-suppress-prompt): New variable. Bind to T to - temporarily suppress the prompt. + * slime-repl.el (slime-repl-suppress-prompt): New variable. Bind + to T to temporarily suppress the prompt. (slime-eval-last-expression-in-repl): New command. Sends form from another buffer to REPL for evaluation. (slime-mode-map): Bind slime-eval-last-expression-in-repl to C-c C-j. @@ -370,11 +378,13 @@ 2011-06-21 Nikodemus Siivola <nikodemus(a)random-state.net> - * slime-cl-indent.el (lisp-loop-indent-forms-like-keywords): Fix type error. - (common-lisp-style-default): Fix type error, move to after styles have been - defined so as to be able to offer a menu for picking the predefined styles. - ("sbcl"): Oops! It's (as ...) not (:as ...). Also add couple of missing defining - forms. + * slime-cl-indent.el (lisp-loop-indent-forms-like-keywords): Fix + type error. + (common-lisp-style-default): Fix type error, move to after styles + have been defined so as to be able to offer a menu for picking the + predefined styles. + ("sbcl"): Oops! It's (as ...) not (:as ...). Also add couple of + missing defining forms. 2011-06-16 Nikodemus Siivola <nikodemus(a)random-state.net> @@ -436,9 +446,10 @@ Refactoring named styles. - * slime-cl-indent.el (define-common-lisp-style): Not a list of hooks anymore, - but just a single hook. Document the fact that code in :eval option may get - called multiple times over the lifetime of a buffer. + * slime-cl-indent.el (define-common-lisp-style): Not a list of + hooks anymore, but just a single hook. Document the fact that code + in :eval option may get called multiple times over the lifetime of + a buffer. (common-lisp-style-name, common-lisp-style-inherits) (common-lisp-style-variables, common-lisp-style-indentation) (common-lisp-style-hook, common-lisp-style-docstring) @@ -605,8 +616,8 @@ * slime-cl-indent.el (common-lisp-indent-function-1): Better #+ support. - (common-lisp-loop-part-indentation): Make newline-and-indent work better - with non-subclause-aware loop indentation. + (common-lisp-loop-part-indentation): Make newline-and-indent work + better with non-subclause-aware loop indentation. 2011-05-15 Didier Verna <didier(a)xemacs.org> @@ -633,13 +644,15 @@ * slime-cl-indent.el (lisp-indent-lambda-list): Use sexp-based traversal instead of regular expressions to figure out how to - indent lambda-lists. Allows indenting destructuring lambda-lists correctly: - previously we could align to a keyword in a previous sublist, instead - of the sublist itself. - (lisp-indent-lambda-list-keywords-regexp): Add support for non-standard &more. + indent lambda-lists. Allows indenting destructuring lambda-lists + correctly: previously we could align to a keyword in a previous + sublist, instead of the sublist itself. + (lisp-indent-lambda-list-keywords-regexp): Add support for + non-standard &more. (test-lisp-indent, run-lisp-indent-tests): Rudimentary tests. - (lisp-indent-259): Use lambda-list-indentation even if the CDR of the path - isn't null: this allows correct indentation of destructuring sublists. + (lisp-indent-259): Use lambda-list-indentation even if the CDR of + the path isn't null: this allows correct indentation of + destructuring sublists. (run-lisp-indent-tests): More test-cases. 2011-05-11 Nikodemus Siivola <nikodemus(a)random-state.net> @@ -673,7 +686,8 @@ (common-lisp-indent-parse-state-start): (common-lisp-indent-parse-state-prev): Parse state accessors. (common-lisp-indent-loop-macro-1): Subclause aware loop indentation. - (common-lisp-indent-loop-advance-past-keyword-on-line): Utility used by the above. + (common-lisp-indent-loop-advance-past-keyword-on-line): Utility + used by the above. 2011-05-10 Nikodemus Siivola <nikodemus(a)random-state.net> @@ -723,8 +737,9 @@ entries. * slime-cl-indent.el (lisp-lambda-list-keyword-alignment): * slime-cl-indent.el (lisp-lambda-list-keyword-parameter-indentation): - * slime-cl-indent.el (lisp-lambda-list-keyword-parameter-alignment): New - customizable user options. + * slime-cl-indent.el + (lisp-lambda-list-keyword-parameter-alignment): New customizable + user options. * slime-cl-indent.el (lisp-indent-defun-method): Improve docstring. * slime-cl-indent.el (extended-loop-p): Fix comment. * slime-cl-indent.el (lisp-indent-lambda-list-keywords-regexp): New @@ -1138,10 +1153,12 @@ 2010-04-18 Stas Boukarev <stassats(a)gmail.com> * slime-presentations.el - (slime-repl-grab-old-output,slime-copy-or-inspect-presentation-at-mouse): - If the presentation at point is no longer available, remove - presentation properties from the object. - * swank-presentations.lisp (lookup-presented-object): defun->defslimefun. + (slime-repl-grab-old-output) + (slime-copy-or-inspect-presentation-at-mouse): If the presentation + at point is no longer available, remove presentation properties + from the object. + * swank-presentations.lisp (lookup-presented-object): + defun->defslimefun. 2010-04-06 Stas Boukarev <stassats(a)gmail.com> @@ -1225,15 +1242,15 @@ 2010-03-20 Stas Boukarev <stassats(a)gmail.com> - * slime-c-p-c.el, slime-fuzzy.el: Don't define keys on slime-repl-mode-map - if slime-repl isn't loaded. + * slime-c-p-c.el, slime-fuzzy.el: Don't define keys on + slime-repl-mode-map if slime-repl isn't loaded. * slime-presentations.el: Refuse to load if slime-repl isn't loaded. Reported by Robert Goldman. 2010-03-13 Stas Boukarev <stassats(a)gmail.com> - * slime-asdf.el: use slime-from-lisp-filename so that slime-tramp can work. - Reported by Peter Stirling. + * slime-asdf.el: use slime-from-lisp-filename so that slime-tramp + can work. Reported by Peter Stirling. 2010-03-12 Stas Boukarev <stassats(a)gmail.com> @@ -1879,8 +1896,9 @@ * slime-repl.el (slime-repl-position-in-history): Add new optional parameter `exclude-string'. - (slime-repl-history-replace): Don't replace history item if it's exactly - matching the current input, search for the next match instead. + (slime-repl-history-replace): Don't replace history item if it's + exactly matching the current input, search for the next match + instead. 2009-11-19 Tobias C. Rittweiler <tcr(a)freebits.de> @@ -1962,10 +1980,10 @@ 2009-11-02 Stas Boukarev <stassats(a)gmail.com> - * slime-parse.el (slime-incomplete-form-at-point): Concatenate " )" - not just ")", because the form's last char may be \, and the parenthesis - will be escaped. - That fixes a bug reported by Ariel Badichi. + * slime-parse.el (slime-incomplete-form-at-point): Concatenate + " )" not just ")", because the form's last char may be \, + and the parenthesis will be escaped. That fixes a bug reported by + Ariel Badichi. 2009-10-31 Tobias C. Rittweiler <tcr(a)freebits.de> @@ -2156,7 +2174,8 @@ 2009-08-27 Stas Boukarev <stassats(a)gmail.com> - * slime-c-p-c.el (slime-contextual-completions): Detect characters properly. + * slime-c-p-c.el (slime-contextual-completions): Detect characters + properly. (slime-completions-for-character): Append #\ to the character names. This fixes character completion, reported by Nick Levine. @@ -2265,9 +2284,9 @@ * slime-fuzzy.el (slime-fuzzy-complete-symbol): show message in the minibuffer after showing completion list, because completion itself can take place in the minibuffer. - (slime-fuzzy-choices-buffer): if completion was started in the minibuffer, - don't switch to minibuffer in the other window, but select minibuffer window - instead. + (slime-fuzzy-choices-buffer): if completion was started in the + minibuffer, don't switch to minibuffer in the other window, but + select minibuffer window instead. 2009-06-23 Helmut Eller <heller(a)common-lisp.net> @@ -3051,10 +3070,10 @@ 2008-04-06 Tobias C. Rittweiler <tcr(a)freebits.de> - * slime-presentations.lisp: + * slime-presentations.lisp: (slime-maybe-M-.-presentation-at-point): Renamed to `slime-edit-presentation'. Now makes sure to decline if user gave - a name explicitly. + a name explicitly. 2008-03-24 Helmut Eller <heller(a)common-lisp.net> @@ -3072,7 +3091,7 @@ string representation of the classifications rather than the classifications themselves. (Notice this propagates up to (and consequently changes the return value of) the RPC function - FUZZY-COMPLETIONS. (incompatible api change.) + FUZZY-COMPLETIONS. (incompatible api change.) Rationale: The number of supported classification can be changed without having to adapt its display at the client. @@ -3106,11 +3125,11 @@ 2008-03-02 Tobias C. Rittweiler <tcr(a)freebits.de> - M-. now works on presentations. + M-. now works on presentations. Additionally, a Find Definition entry is presented in the menu appearing on right clicking on a presentation. - + * slime-presentations.lisp (slime-M-.-presentation): New function. (slime-M-.-presentation-at-mouse): New function. (slime-M-.-presentation-at-point): New function. @@ -3128,7 +3147,7 @@ Having the `slime-presentations' contrib enabled, (princ 10) resulted in "1010" rather than "10\n10". (This also caused a regression in the `repl-test' test case.) - + * swank-presentations.lisp (present-repl-results): Emit fresh-line as the original SEND-REPL-RESULTS-TO-EMACS does. @@ -3222,16 +3241,16 @@ 2008-01-20 Matthias Koeppe <mkoeppe(a)mail.math.uni-magdeburg.de> - Hook presentations into debugger and inspector, restoring + Hook presentations into debugger and inspector, restoring features that were removed on 2007-08-27. - + * slime-presentations.el (slime-presentation-add-easy-menu): Install presentation menu also in the debugger and inspector. (slime-presentation-inspector-insert-ispec): New. (slime-presentation-sldb-insert-frame-variable-value): New. (slime-presentations-init): Install these functions as slime-inspector-insert-ispec-function and - sldb-insert-frame-variable-value-function. + sldb-insert-frame-variable-value-function. 2008-01-19 Helmut Eller <heller(a)common-lisp.net> @@ -3243,7 +3262,7 @@ * slime-presentations.el (slime-copy-or-inspect-presentation-at-mouse): Call slime-copy-presentation-at-mouse-to-repl rather than - slime-copy-presentation-at-mouse. + slime-copy-presentation-at-mouse. 2008-01-10 Tobias C. Rittweiler <tcr(a)freebits.de> @@ -3252,42 +3271,42 @@ * swank-arglist.lisp (read-form-spec): Added assertion against receiving junk form specs from Emacs. - + 2008-01-10 Tobias C. Rittweiler <tcr(a)freebits.de> * slime-editing-commands.el (slime-close-all-parens-in-sexp): Use new portability function `slime-delete-and-extract-region'. - + 2008-01-10 Tobias C. Rittweiler <tcr(a)freebits.de> * swank-parse.lisp (slime-incomplete-form-at-point): Hopefully better fix than before. - + 2008-01-10 Matthias Koeppe <mkoeppe(a)mail.math.uni-magdeburg.de> Add keyboard commands (starting with C-c C-v) and a top-level menu for presentation-related commands. Add a command (C-c C-v M-o) to forget all objects associated with presentations, without clearing the REPL buffer. - + * slime-presentations.el (slime-presentation-around-or-before-point-or-error): New function. (slime-inspect-presentation): New function, factored out from - slime-inspect-presentation-at-mouse. + slime-inspect-presentation-at-mouse. (slime-inspect-presentation-at-mouse): Use it here. (slime-inspect-presentation-at-point): New command. (slime-copy-presentation-to-repl): New function, factored out from slime-copy-presentation-at-mouse. (slime-copy-presentation-at-mouse-to-repl): Renamed from slime-copy-presentation-at-mouse; use the new function - slime-copy-presentation-to-repl. + slime-copy-presentation-to-repl. (slime-copy-presentation-at-point-to-repl): New command. (slime-copy-presentation-to-kill-ring): New function, factored out from slime-copy-presentation-at-mouse-to-kill-ring. (slime-copy-presentation-at-point-to-kill-ring): New command. (slime-describe-presentation): New function, factored out from - slime-describe-presentation-at-mouse. + slime-describe-presentation-at-mouse. (slime-describe-presentation-at-mouse): Use it here. (slime-describe-presentation-at-point): New command. (slime-pretty-print-presentation): New function, factored out @@ -3296,7 +3315,7 @@ (slime-pretty-print-presentation-at-point): New command. (slime-mark-presentation): New command. (slime-previous-presentation, slime-next-presentation): New - commands. + commands. (slime-presentation-command-map, slime-presentation-bindings): New variables. (slime-presentation-init-keymaps): New function. @@ -3314,13 +3333,13 @@ arglist index the user's point is located at correctly into account. Previously `C-c C-s' on `(defun |foo' would have inserted `args body...)', now it inserts `name args body...)' - + 2008-01-10 Tobias C. Rittweiler <tcr(a)freebits.de> * swank-arglists.lisp (read-form-spec): Changed "cons" clause to "list" clause in etypecase. Fix for error on arglist display on `(declare (ftype (|)))', | being point. - + 2008-01-10 Tobias C. Rittweiler <tcr(a)freebits.de> * slime-fuzzy.el (slime-fuzzy-completion-time-limit-in-msec): @@ -3331,12 +3350,12 @@ (fuzzy-generate-matchings): Sort package matchings before traversal, such that they're traversed in the order of their score. (Important when time limit exhausts during traversal.) - + 2008-01-09 Matthias Koeppe <mkoeppe(a)mail.math.uni-magdeburg.de> Restore support for Scheme programs that was removed from core SLIME on 2007-09-19, as a "slime-scheme" contrib. - + * slime-scheme.el: New file. 2007-12-30 Tobias C. Rittweiler <tcr(a)freebits.de> @@ -3353,15 +3372,15 @@ 2007-11-27 Tobias C. Rittweiler <tcr(a)freebits.de> * swank-arglists.lisp (arglist-dispatch 'defmethod): Use - VALID-FUNCTION-NAME-P. Fixes error on certain `(defmethod (setf ...))' - forms. - + VALID-FUNCTION-NAME-P. Fixes error on certain + `(defmethod (setf ...))' forms. + 2007-11-27 Tobias C. Rittweiler <tcr(a)freebits.de> * swank-arglists.lisp (print-arglist): Print initforms in &optional and &key lambda list specifiers as if by PRIN1 instead of PRINC. Reported by Michael Weber. - + 2007-11-24 Helmut Eller <heller(a)common-lisp.net> * slime-fuzzy.el: Use slime-require instead of a connected-hook. @@ -3394,7 +3413,7 @@ * slime-typeout-frame.el: Messages in the typeout frame were too easily overwritten by `slime-autodoc'. Fix that. Reported by Geoff Wozniak. - + (slime-typeout-message-aux): Split out from `slime-typeout-message'. (slime-typeout-message): Wrapper around it. Additionally disable the autodoc timer temporarily. @@ -3451,11 +3470,11 @@ * swank-fuzzy.lisp: Fix regression that would not allow to fuzzy complete on inputs without package qualifier like "app". Reported by David J. Neu. - + (%make-duplicate-symbols-filter): Return complement. (fuzzy-find-matching-symbols): Treat passed filter as an acceptor predicate, not as a rejector. - + 2007-09-15 Helmut Eller <heller(a)common-lisp.net> Add the necessary hooks when loading some contribs, so that those @@ -3478,7 +3497,7 @@ * slime-parse.el: Fix extended arglist display on misbalanced expressions like `(defun foo | ... (defun bar () 'bar)' Reported by Ariel Badichi. - + (slime-inside-string-p): Use `beginning-of-defun' directly than relying on `slime-region-for-defun-at-point' (as this one uses `end-of-defun' which signals an error on misbalanced expressions.) @@ -3509,17 +3528,17 @@ than their home package when the home package is among the matched packages. Try to take the time needed to sort the generated matchings into account for the time-limit. - (%guess-sort-duration): Helper. + (%guess-sort-duration): Helper. Tries to guess how long the sort will take. - (%make-duplicate-symbols-filter): Helper. + (%make-duplicate-symbols-filter): Helper. Used for pruning of matchings. (fuzzy-matching-greaterp): New testing predicate for sorting. (fuzzy-find-matching-symbols): Now takes a :filter keyarg; only considers symbols that pass through the filter. (fuzzy-find-matching-packages): Do not return matchings for all - nicknames of package, but just the one that matches best. - + nicknames of package, but just the one that matches best. + 2007-09-11 Tobias C. Rittweiler <tcr(a)freebits.de> * slime-editing-commands.el: Automatically bind the editing @@ -3527,7 +3546,8 @@ enable them explicitly, but this is inconsistent to, for instance, the `slime-c-p-c' module which also sets up its bindings automatically.) - (slime-bind-editing-commands): Renamed to `slime-editing-commands-init'. + (slime-bind-editing-commands): Renamed to + `slime-editing-commands-init'. (slime-editing-commands-init): Evaluated at toplevel. 2007-09-11 Tobias C. Rittweiler <tcr(a)freebits.de> @@ -3546,7 +3566,7 @@ 2007-09-11 Tobias C. Rittweiler <tcr(a)freebits.de> * slime-fancy.el: Require `slime-references'. - + 2007-09-10 Helmut Eller <heller(a)common-lisp.net> * slime-parse.el (slime-cl-symbol-name, slime-cl-symbol-package): @@ -3559,12 +3579,12 @@ 2007-09-10 Helmut Eller <heller(a)common-lisp.net> Fix some of the bugs introduced with the last change. - + * slime-references.el (sldb-reference-face): Add missing quote. (sldb-reference-properties): We are lucky and can use keywords instead of strings. (sldb-maybe-insert-references): Insert newlines differently. - + 2007-09-10 Helmut Eller <heller(a)common-lisp.net> Move SBCL doc references to contrib. @@ -3576,7 +3596,7 @@ * slime-fuzzy.el: Fixed some race condition that prevented a proper closing of the *Fuzzy Completions* buffer in some circumstances. - + (slime-fuzzy-save-window-configuration): Removed. Hooking up `window-configuration-change-hook' via `run-with-timer' was racy and lead to this bug; we now set the hook explicitely at the @@ -3605,7 +3625,7 @@ 2007-09-05 Tobias C. Rittweiler <tcr(a)freebits.de> * swank-c-p-c.el: This file incorrectly provided the module - `:swank-compound-prefix'; changed that to `:swank-c-p-c'. + `:swank-compound-prefix'; changed that to `:swank-c-p-c'. This gets rid off the nasty redefinition warnings that were previously signalled when loading SWANK with SBCL. @@ -3618,17 +3638,17 @@ * slime-c-p-c.el (slime-c-p-c-init): Bind `slime-complete-form' to `C-c C-s' in `slime-repl-mode-map'. - + 2007-09-05 Tobias C. Rittweiler <tcr(a)freebits.de> Added extended arglist display for DECLAIM and PROCLAIM. - + * slime-parse.el (slime-extended-operator-name-parser-alist): Added entries for "DECLAIM", and "PROCLAIM". (slime-parse-extended-operator/declare): Provide information about the operator the arglist is requested for. (slime-make-form-spec-from-string): Fixed for "()" as input. - + * swank-arglists.lisp (valid-operator-symbol-p): Explicitly allow the symbol 'DECLARE. (arglist-dispatch): New method for `DECLARE'. We have to catch @@ -3655,7 +3675,7 @@ `(defun foo (x) (let ((bar 'quux)) (with-open-file (s f :|' [`|' being point] - + 2007-09-04 Helmut Eller <heller(a)common-lisp.net> * swank-arglists.lisp (parse-first-valid-form-spec): Rewrite it for @@ -3707,19 +3727,20 @@ Makes `slime-complete-form' work on `(eval-when |'; doesn't work on `(eval-when (|' yet. - + * slime-parse.el (slime-parse-sexp-at-point): Guard against `(char-after)' being NIL at end of buffer (especially important for use on the REPL.) * swank-arglist.lisp (arglist-dispatch 'eval-when): Fix typo. (print-decoded-arglist-as-template): Print keywords with PRIN1. - + 2007-08-31 Tobias C. Rittweiler <tcr(a)freebits.de> Added extended arglist display for EVAL-WHEN, viz: - (eval-when (&any :compile-toplevel :load-toplevel :execute) &body body) + (eval-when (&any :compile-toplevel :load-toplevel :execute) + &body body) Notice that completion works as expected on these keywords. @@ -3728,8 +3749,8 @@ * swank-arglist (arglist-dispatch): New method for EVAL-WHEN. (print-arglist): Print keywords with PRIN1 rather than PRINC, to get a result as shown above for the EVAL-WHEN case. - (completions-for-keyword): Add support for &ANY args. - + (completions-for-keyword): Add support for &ANY args. + 2007-08-31 Tobias C. Rittweiler <tcr(a)freebits.de> * swank-arglist.lisp: Do not fall back to READ when interpreting @@ -3753,7 +3774,7 @@ elements of the passed ``raw form spec''. Uses `read-softly' as default reader. - (complete-form, completions-for-keywords): + (complete-form, completions-for-keywords): Use `unintern-in-home-package'. 2007-08-31 Helmut Eller <heller(a)common-lisp.net> @@ -3804,9 +3825,9 @@ 2007-08-28 Matthias Koeppe <mkoeppe(a)mail.math.uni-magdeburg.de> - * swank-presentations.lisp (send-repl-results-to-emacs): + * swank-presentations.lisp (send-repl-results-to-emacs): Override core defun to mark up REPL results as presentations. - + * swank-presentations.lisp: New file. * slime-presentations.el: Load it. @@ -3825,11 +3846,11 @@ 2007-08-24 Matthias Koeppe <mkoeppe(a)mail.math.uni-magdeburg.de> Some fixes to the presentation-streams contrib. - + * swank-presentation-streams.lisp [sbcl]: Load the pretty-printer patch only at load time. Add some trickery so that SBCL does not complain about the changed layout of the pretty-stream class. - + * swank-presentation-streams.lisp (slime-stream-p): Using special return values, indicate whether we are printing to the REPL-results stream, or a dedicated stream. @@ -3838,10 +3859,10 @@ global variable *use-dedicated-output-stream*) to decide whether to use the bridge protocol or the :presentation-start/-end protocol. Also use it as the TARGET argument of - :presentation-start/-end messages. + :presentation-start/-end messages. (presenting-object-1): Use the new return values of slime-stream-p. - + * swank-presentation-streams.lisp (slime-stream-p) [cmu]: Use the return value of slime-stream-p rather than the global variable *use-dedicated-output-stream* to decide whether printing through @@ -3851,11 +3872,11 @@ Make the fancy "presentation streams" feature a contrib. Previously, it was only available if "present.lisp" was loaded - manually. - + manually. + * slime-presentation-streams.el: New file. * swank-presentation-streams.lisp: New file, moved here from - ../present.lisp + ../present.lisp 2007-08-24 Helmut Eller <heller(a)common-lisp.net>

3 9