(:emacs-rex (swank:connection-info) nil t 1) (:indentation-update (("without-package-locks" . 0) ("with-timeout" . 1) ("define-source-context" . 2) ("with-unlocked-packages" . 1) ("with-locked-hash-table" . 1) ("with-unique-names" . 1) ("defun-cached" . 2) ("with-sane-io-syntax" . 0) ("once-only" . 1) ("with-rebound-io-syntax" . 0) ("defmacro-mundanely" . 2) ("awhen" . 1) ("define-function-name-syntax" . 2) ("dohash" . 1) ("named-lambda" . 2) ("dovector" . 1) ("binding*" . 1) ("with-float-traps-masked" . 1) ("named-let" . 2) ("do-info" . 1) ...)) (:return (:ok (:pid 9544 :style nil :lisp-implementation (:type "SBCL" :name "sbcl" :version "1.0.19") :machine (:instance "HELLSHEAVEN" :type "X86" :version nil) :features (:asdf :ansi-cl :common-lisp :sbcl :sb-doc :sb-test :sb-ldb :sb-package-locks :sb-unicode :sb-eval :sb-source-locations :ieee-floating-point :x86 :win32 :gencgc :stack-grows-downward-not-upward :c-stack-is-control-stack :compare-and-swap-vops :unwind-to-frame-and-call-vop :raw-instance-init-vops ...) :modules ("SB-CLTL2" "SB-POSIX" "SB-INTROSPECT" "SB-BSD-SOCKETS" "SB-GROVEL" "ASDF") :package (:name "COMMON-LISP-USER" :prompt "CL-USER") :version "2008-12-02")) 1) (:emacs-rex (swank:operator-arglist "error" "COMMON-LISP-USER") "COMMON-LISP-USER" :repl-thread 2) (:return (:ok "(error DATUM &REST ARGUMENTS)") 2) (:emacs-rex (swank:listener-eval "(error 'foo)\n\n") "COMMON-LISP-USER" :repl-thread 3) (:debug 0 1 ("Bad type argument:\n FOO" " [Condition of type SIMPLE-TYPE-ERROR]" nil) (("RETRY" "Retry SLIME REPL evaluation request.") ("ABORT" "Return to SLIME's top level.") ("CLOSE-CONNECTION" "Close SLIME connection") ("ABORT" "Exit debugger, returning to top level.")) ((0 "(MAKE-CONDITION FOO)[:EXTERNAL]") (1 "(ERROR FOO)[:EXTERNAL]") (2 "(SB-INT:SIMPLE-EVAL-IN-LEXENV (ERROR 'FOO) #)") (3 "(SWANK::EVAL-REGION \"(error 'foo)\\n\\n\")") (4 "((LAMBDA ()))") (5 "(SWANK::TRACK-PACKAGE #)") (6 "(SWANK::CALL-WITH-RETRY-RESTART \"Retry SLIME REPL evaluation request.\" #)") (7 "(SWANK::CALL-WITH-BUFFER-SYNTAX NIL #)") (8 "(SWANK::REPL-EVAL \"(error 'foo)\\n\\n\")") (9 "(SB-INT:SIMPLE-EVAL-IN-LEXENV (SWANK:LISTENER-EVAL \"(error 'foo)\\n\\n\") #)") (10 "(SWANK::EVAL-FOR-EMACS (SWANK:LISTENER-EVAL \"(error 'foo)\\n\\n\") \"COMMON-LISP-USER\" 3)") (11 "(SWANK::PROCESS-REQUESTS NIL)") (12 "((LAMBDA ()))") (13 "((FLET #:FORM-FUN1276))") (14 "((LAMBDA (SWANK-BACKEND::HOOK SWANK-BACKEND::FUN)) # #)") (15 "(SWANK::CALL-WITH-REDIRECTED-IO # #)") (16 "(SWANK::CALL-WITH-CONNECTION # #)") (17 "(SWANK::HANDLE-REQUESTS # NIL)") (18 "((LAMBDA ()))") (19 "((LAMBDA (SWANK-BACKEND::HANDLER FUNCTION)) # #)")) (3)) (:debug-activate 0 1 nil) (:emacs-rex (swank:throw-to-toplevel) nil 0 4) (:return (:abort) 4) (:debug-return 0 1 nil)