[---Sent---] 0.17 (:emacs-rex (swank:connection-info) nil #t 1) [-Received-] 0.17 (:return (:ok (:pid 3116 :package (:name "(user)" :prompt "(user)") :lisp-implementation (:type "MIT/GNU Scheme" :version "9.1") :version "20100404")) 1) [Actionlist] 0.17 1: finished :connection-info params: [':pid', '3116', ':package', [':name', '"(user)"', ':prompt', '"(user)"'], ':lisp-implementation', [':type', '"MIT/GNU Scheme"', ':version', '"9.1"'], ':version', '"20100404"'] Package:(user) Prompt:(user) [---Sent---] 0.19 (:emacs-rex (swank:create-repl nil) "(user)" #t 2) [-Received-] 0.19 (:return (:ok ("environment-14" "environment-14")) 2) [Actionlist] 0.19 2: finished :create-repl params: ['"environment-14"', '"environment-14"'] [---Sent---] 0.23 (:emacs-rex (swank:simple-completions "make" "(user)") nil #t 3) [-Received-] 0.23 (:debug 0 1 ("The object nil, passed as an argument to string-ci=?, is not a string." " [wrong-type-argument]" nil) (("abort" "Return to SLIME top-level.")) ((0 ";undefined expression") (1 "(if (not (and (string? string1) (string? string2))) (guarantee-2-strings/fail string1 string2 (quote string-ci=?)))") (2 "(if (string? pstring) (string-ci=? *buffer-pstring* \"COMMON-LISP-USER\") #t)") (3 "(pstring->env pstring)") (4 "(emacs-rex socket sexp pstring)") (5 "(with-simple-restart (quote abort) \"Return to SLIME top-level.\" (lambda () (let ((in-temp (find-restart (quote abort))) (out-temp)) (shallow-fluid-bind (lambda () (set! out-temp (set! *top-level-restart* (set! in-temp))) #!unspecific) (lambda () (process-one-message socket 0)) (lambda () (set! in-temp (set! *top-level-restart* (set! out-temp))) #!unspecific)))))") (6 "(start-swank)")) ()) [-Received-] 0.25 (:debug-activate 0 1)