My troubles were caused by a function on slime-connected-hook that called slime-inferior-process.
Sorry for the noise.
Andras
On Mon, 9 Apr 2007, Andras Simon wrote:
Connecting to a swank server opened with
(swank:create-server :port 4005 :dont-close t)
I get the following:
Debugger entered--Lisp error: (wrong-type-argument processp nil) set-process-filter(nil (lambda (process string) (slime-write-string string))) (lambda (&rest args) (set-process-filter (slime-inferior-process) (lambda ... ...)))() run-hooks(slime-connected-hook) (let ((args ...)) (when-let (name ...) (unless ... ...)) (slime-hide-inferior-lisp-buffer) (slime-init-output-buffer connection) (run-hooks (quote slime-connected-hook)) (when-let (fun ...) (funcall fun))) (let ((slime-dispatching-connection connection)) (destructuring-bind (&key pid style lisp-implementation machine features package version &allow-other-keys) info (or ... ... ... ...) (setf ... pid ... style ... features) (destructuring-bind ... package ...) (destructuring-bind ... lisp-implementation ...) (destructuring-bind ... machine ...)) (setq slime-state-name "") (let (...) (when-let ... ...) (slime-hide-inferior-lisp-buffer) (slime-init-output-buffer connection) (run-hooks ...) (when-let ... ...)) (message "Connected. %s" (slime-random-words-of-encouragement))) slime-set-connection-info(#<process SLIME Lisp> (:pid 6231 :style :spawn :lisp-implementation (:type "SBCL" :name "sbcl" :version "1.0.1.24") :machine (:instance "omnibus" :type "X86-64" :version "Dual Core AMD Opteron(tm) Processor 265") :features (:asdf :sb-thread :ansi-cl :common-lisp :sbcl :unix :sb-doc :sb-test :sb-ldb :sb-package-locks :sb-unicode :sb-eval :sb-source-locations :ieee-floating-point :x86-64 :elf :linux :gencgc :stack-grows-downward-not-upward :c-stack-is-control-stack :linkage-table :stack-allocatable-closures :alien-callbacks :os-provides-dlopen :os-provides-dladdr :os-provides-putwc) :package (:name "COMMON-LISP-USER" :prompt "CL-USER") :version "2007-04-09")) (lambda (G81915 info) (slime-set-connection-info (symbol-value G81915) info))(--proc-- (:pid 6231 :style :spawn :lisp-implementation (:type "SBCL" :name "sbcl" :version "1.0.1.24") :machine (:instance "omnibus" :type "X86-64" :version "Dual Core AMD Opteron(tm) Processor 265") :features (:asdf :sb-thread :ansi-cl :common-lisp :sbcl :unix :sb-doc :sb-test :sb-ldb :sb-package-locks :sb-unicode :sb-eval :sb-source-locations :ieee-floating-point :x86-64 :elf :linux :gencgc :stack-grows-downward-not-upward :c-stack-is-control-stack :linkage-table :stack-allocatable-closures :alien-callbacks :os-provides-dlopen :os-provides-dladdr :os-provides-putwc) :package (:name "COMMON-LISP-USER" :prompt "CL-USER") :version "2007-04-09")) apply((lambda (G81915 info) (slime-set-connection-info (symbol-value G81915) info)) --proc-- (:pid 6231 :style :spawn :lisp-implementation (:type "SBCL" :name "sbcl" :version "1.0.1.24") :machine (:instance "omnibus" :type "X86-64" :version "Dual Core AMD Opteron(tm) Processor 265") :features (:asdf :sb-thread :ansi-cl :common-lisp :sbcl :unix :sb-doc :sb-test :sb-ldb :sb-package-locks :sb-unicode :sb-eval :sb-source-locations :ieee-floating-point :x86-64 :elf :linux :gencgc :stack-grows-downward-not-upward :c-stack-is-control-stack :linkage-table :stack-allocatable-closures :alien-callbacks :os-provides-dlopen :os-provides-dladdr :os-provides-putwc) :package (:name "COMMON-LISP-USER" :prompt "CL-USER") :version "2007-04-09")) (lambda (&rest --cl-rest--) (apply (lambda ... ...) (quote --proc--) --cl-rest--))((:pid 6231 :style :spawn :lisp-implementation (:type "SBCL" :name "sbcl" :version "1.0.1.24") :machine (:instance "omnibus" :type "X86-64" :version "Dual Core AMD Opteron(tm) Processor 265") :features (:asdf :sb-thread :ansi-cl :common-lisp :sbcl :unix :sb-doc :sb-test :sb-ldb :sb-package-locks :sb-unicode :sb-eval :sb-source-locations :ieee-floating-point :x86-64 :elf :linux :gencgc :stack-grows-downward-not-upward :c-stack-is-control-stack :linkage-table :stack-allocatable-closures :alien-callbacks :os-provides-dlopen :os-provides-dladdr :os-provides-putwc) :package (:name "COMMON-LISP-USER" :prompt "CL-USER") :version "2007-04-09")) funcall((lambda (&rest --cl-rest--) (apply (lambda ... ...) (quote --proc--) --cl-rest--)) (:pid 6231 :style :spawn :lisp-implementation (:type "SBCL" :name "sbcl" :version "1.0.1.24") :machine (:instance "omnibus" :type "X86-64" :version "Dual Core AMD Opteron(tm) Processor 265") :features (:asdf :sb-thread :ansi-cl :common-lisp :sbcl :unix :sb-doc :sb-test :sb-ldb :sb-package-locks :sb-unicode :sb-eval :sb-source-locations :ieee-floating-point :x86-64 :elf :linux :gencgc :stack-grows-downward-not-upward :c-stack-is-control-stack :linkage-table :stack-allocatable-closures :alien-callbacks :os-provides-dlopen :os-provides-dladdr :os-provides-putwc) :package (:name "COMMON-LISP-USER" :prompt "CL-USER") :version "2007-04-09")) (if (symbol-value G81920) (funcall (symbol-value G81920) result)) (let* ((--cl-rest-- rand-81918) (result ...)) (if (symbol-value G81920) (funcall ... result))) (cond ((eql op-81917 ...) (let* ... ...)) ((eql op-81917 ...) (let* ... ... ...)) (t (error "Elisp destructure-case failed: %S" tmp-81919))) (let* ((tmp-81919 G81916) (op-81917 ...) (rand-81918 ...)) (cond (... ...) (... ...) (t ...))) (lambda (G81920 G81916) (let* (... ... ...) (cond ... ... ...)))(--cont-- (:ok (:pid 6231 :style :spawn :lisp-implementation (:type "SBCL" :name "sbcl" :version "1.0.1.24") :machine (:instance "omnibus" :type "X86-64" :version "Dual Core AMD Opteron(tm) Processor 265") :features (:asdf :sb-thread :ansi-cl :common-lisp :sbcl :unix :sb-doc :sb-test :sb-ldb :sb-package-locks :sb-unicode :sb-eval :sb-source-locations :ieee-floating-point :x86-64 :elf :linux :gencgc :stack-grows-downward-not-upward :c-stack-is-control-stack :linkage-table :stack-allocatable-closures :alien-callbacks :os-provides-dlopen :os-provides-dladdr :os-provides-putwc) :package (:name "COMMON-LISP-USER" :prompt "CL-USER") :version "2007-04-09"))) apply((lambda (G81920 G81916) (let* (... ... ...) (cond ... ... ...))) --cont-- (:ok (:pid 6231 :style :spawn :lisp-implementation (:type "SBCL" :name "sbcl" :version "1.0.1.24") :machine (:instance "omnibus" :type "X86-64" :version "Dual Core AMD Opteron(tm) Processor 265") :features (:asdf :sb-thread :ansi-cl :common-lisp :sbcl :unix :sb-doc :sb-test :sb-ldb :sb-package-locks :sb-unicode :sb-eval :sb-source-locations :ieee-floating-point :x86-64 :elf :linux :gencgc :stack-grows-downward-not-upward :c-stack-is-control-stack :linkage-table :stack-allocatable-closures :alien-callbacks :os-provides-dlopen :os-provides-dladdr :os-provides-putwc) :package (:name "COMMON-LISP-USER" :prompt "CL-USER") :version "2007-04-09"))) (lambda (&rest --cl-rest--) (apply (lambda ... ...) (quote --cont--) --cl-rest--))((:ok (:pid 6231 :style :spawn :lisp-implementation (:type "SBCL" :name "sbcl" :version "1.0.1.24") :machine (:instance "omnibus" :type "X86-64" :version "Dual Core AMD Opteron(tm) Processor 265") :features (:asdf :sb-thread :ansi-cl :common-lisp :sbcl :unix :sb-doc :sb-test :sb-ldb :sb-package-locks :sb-unicode :sb-eval :sb-source-locations :ieee-floating-point :x86-64 :elf :linux :gencgc :stack-grows-downward-not-upward :c-stack-is-control-stack :linkage-table :stack-allocatable-closures :alien-callbacks :os-provides-dlopen :os-provides-dladdr :os-provides-putwc) :package (:name "COMMON-LISP-USER" :prompt "CL-USER") :version "2007-04-09"))) slime-dispatch-event((:return (:ok (:pid 6231 :style :spawn :lisp-implementation ... :machine ... :features ... :package ... :version "2007-04-09")) 1) #<process SLIME Lisp>) slime-process-available-input(#<process SLIME Lisp>) slime-net-filter(#<process SLIME Lisp> "in-addr" . 2) ("with-vector-sap" . 1) ("with-sockaddr-for" . 1) ("with-alien-termios" . 2) ("with-alien-passwd" . 2) ("define-designator" . 2) ("with-alien-utimbuf" . 2) ("with-alien-stat" . 2) ("define-entry-point" . 2) ("with-dirent" . 2) ("with-alien-timeval" . 2) ("with-buffer-syntax" . 1) ("with-describe-settings" . 1) ("with-connection" . 1) ("defslimefun" . 2) ("do-symbols*" . 1) ("without-interrupts" . 0) ("with-reader-error-handler" . 1) ("with-temp-package" . 1) ("with-bindings" . 1) ("with-io-redirection" . 1)))000294(:return (:ok (:pid 6231 :style :spawn :lisp-implementation (:type "SBCL" :name "sbcl" :version "1.0.1.24") :machine (:instance "omnibus" :type "X86-64" :version "Dual Core AMD Opteron(tm) Processor 265") :features (:asdf :sb-thread :ansi-cl :common-lisp :sbcl :unix :sb-doc :sb-test :sb-ldb :sb-package-locks :sb-unicode :sb-eval :sb-source-locations :ieee-floating-point :x86-64 :elf :linux :gencgc :stack-grows-downward-not-upward :c-stack-is-control-stack :linkage-table :stack-allocatable-closures :alien-callbacks :os-provides-dlopen :os-provides-dladdr :os-provides-putwc) :package (:name "COMMON-LISP-USER" :prompt "CL-USER") :version "2007-04-09")) 1)")
But I also get a working *slime-repl*.
However, after slime-disconnect, slime-connect gives
error in process filter: Wrong type argument: processp, nil
and I can only reconnect from a fresh emacs. After an unsuccessful connect, *slime-events* looks just like it does after a connection is established.
Is slime-disconnect the correct way of disconnecting?
GNU Emacs 22.0.50.1, slime is cvs head, the lisps I tried this with are sbcl 1.0.1.24 and LWL Personal 5.0.1.
Andras
slime-devel site list slime-devel@common-lisp.net http://common-lisp.net/mailman/listinfo/slime-devel