(progn (load "f:/Programme/emacs-22.2/site-lisp/slime/swank-loader.lisp" :verbose t) (funcall (read-from-string "swank-loader:init")) (funcall (read-from-string "swank:start-server") "f:/DOKUME~1/Joreji/LOKALE~1/Temp/slime.4284" :coding-system "iso-latin-1-unix"))
This is SBCL 1.0.19, an implementation of ANSI Common Lisp.
More information about SBCL is available at .
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.
This is experimental prerelease support for the Windows platform: use
at your own risk. "Your Kitten of Death awaits!"
*
; loading #P"f:\\Programme\\emacs-22.2\\site-lisp\\slime\\swank-loader.lisp"
; loading #P"F:\\Dokumente und Einstellungen\\Joreji\\Anwendungsdaten\\.slime\\fasl\\2008-12-02\\sbcl-1.0.19-win32-x86\\swank-backend.fasl"
; loading #P"F:\\Dokumente und Einstellungen\\Joreji\\Anwendungsdaten\\.slime\\fasl\\2008-12-02\\sbcl-1.0.19-win32-x86\\swank-source-path-parser.fasl"
; loading #P"F:\\Dokumente und Einstellungen\\Joreji\\Anwendungsdaten\\.slime\\fasl\\2008-12-02\\sbcl-1.0.19-win32-x86\\swank-source-file-cache.fasl"
; compiling file "f:\\Programme\\emacs-22.2\\site-lisp\\slime\\swank-sbcl.lisp" (written 04 DEC 2008 10:34:37 PM):
; file: f:\Programme\emacs-22.2\site-lisp\slime\swank-sbcl.lisp
; in: DEFIMPLEMENTATION FILENAME-TO-PATHNAME
; (PARSE-NATIVE-NAMESTRING SWANK-BACKEND::FILENAME
; SWANK-BACKEND::*PHYSICAL-PATHNAME-HOST*)
;
; caught STYLE-WARNING:
; &OPTIONAL and &KEY found in the same lambda list: ((OR (VECTOR CHARACTER)
; (VECTOR NIL) BASE-STRING
; PATHNAME FILE-STREAM)
; &OPTIONAL
; (OR CONS SB-KERNEL:HOST
; (VECTOR CHARACTER)
; (VECTOR NIL) BASE-STRING
; (MEMBER :UNSPECIFIC
; NIL))
; (OR (VECTOR CHARACTER)
; (VECTOR NIL) BASE-STRING
; PATHNAME FILE-STREAM)
; &KEY
; (:START (MOD 536870911))
; (:END
; (OR (MOD 536870911) NULL))
; (:JUNK-ALLOWED T)
; (:AS-DIRECTORY T))
; in: DEFUN SET-SIGIO-HANDLER
; (SB-SYS:ENABLE-INTERRUPT SB-UNIX:SIGIO
; (LAMBDA (SIGNAL SWANK-BACKEND::CODE SWANK-BACKEND::SCP)
; (SWANK-BACKEND::SIGIO-HANDLER SIGNAL SWANK-BACKEND::CODE
; SWANK-BACKEND::SCP)))
;
; caught STYLE-WARNING:
; undefined function: SB-SYS:ENABLE-INTERRUPT
; in: DEFUN ENABLE-SIGIO-ON-FD
; (SB-POSIX::FCNTL SWANK-BACKEND::FD SB-POSIX:F-SETFL SB-POSIX:O-ASYNC)
;
; caught WARNING:
; undefined variable: SB-POSIX:F-SETFL
; (SB-POSIX::FCNTL SWANK-BACKEND::FD SB-POSIX:F-SETOWN (SWANK-BACKEND:GETPID))
;
; caught WARNING:
; undefined variable: SB-POSIX:F-SETOWN
; (SB-POSIX::FCNTL SWANK-BACKEND::FD SB-POSIX:F-SETFL SB-POSIX:O-ASYNC)
;
; caught STYLE-WARNING:
; undefined function: SB-POSIX::FCNTL
;
; caught WARNING:
; undefined variable: SB-POSIX:O-ASYNC
; in: DEFUN SET-SIGIO-HANDLER
; (SB-SYS:ENABLE-INTERRUPT SB-UNIX:SIGIO
; (LAMBDA (SIGNAL SWANK-BACKEND::CODE SWANK-BACKEND::SCP)
; (SWANK-BACKEND::SIGIO-HANDLER SIGNAL SWANK-BACKEND::CODE
; SWANK-BACKEND::SCP)))
;
; caught WARNING:
; undefined variable: SB-UNIX:SIGIO
;
; caught WARNING:
; These variables are undefined:
; SB-POSIX:F-SETFL SB-POSIX:F-SETOWN SB-POSIX:O-ASYNC SB-UNIX:SIGIO
;
; caught STYLE-WARNING:
; These functions are undefined:
; SB-SYS:ENABLE-INTERRUPT SB-POSIX::FCNTL
;
; compilation unit finished
; caught 5 WARNING conditions
; caught 4 STYLE-WARNING conditions
; F:\Dokumente und Einstellungen\Joreji\Anwendungsdaten\.slime\fasl\2008-12-02\sbcl-1.0.19-win32-x86\swank-sbcl.fasl written
; compilation finished in 0:00:01
; loading #P"F:\\Dokumente und Einstellungen\\Joreji\\Anwendungsdaten\\.slime\\fasl\\2008-12-02\\sbcl-1.0.19-win32-x86\\swank-sbcl.fasl"
STYLE-WARNING: redefining EMACS-INSPECT (#) in DEFMETHOD
; compiling file "f:\\Programme\\emacs-22.2\\site-lisp\\slime\\swank-gray.lisp" (written 04 DEC 2008 08:36:16 PM):
; F:\Dokumente und Einstellungen\Joreji\Anwendungsdaten\.slime\fasl\2008-12-02\sbcl-1.0.19-win32-x86\swank-gray.fasl written
; compilation finished in 0:00:01
; loading #P"F:\\Dokumente und Einstellungen\\Joreji\\Anwendungsdaten\\.slime\\fasl\\2008-12-02\\sbcl-1.0.19-win32-x86\\swank-gray.fasl"
STYLE-WARNING:
Implicitly creating new generic function STREAM-READ-CHAR-WILL-HANG-P.
; compiling file "f:\\Programme\\emacs-22.2\\site-lisp\\slime\\swank.lisp" (written 04 DEC 2008 08:36:19 PM):
; F:\Dokumente und Einstellungen\Joreji\Anwendungsdaten\.slime\fasl\2008-12-02\sbcl-1.0.19-win32-x86\swank.fasl written
; compilation finished in 0:00:01
; loading #P"F:\\Dokumente und Einstellungen\\Joreji\\Anwendungsdaten\\.slime\\fasl\\2008-12-02\\sbcl-1.0.19-win32-x86\\swank.fasl"
WARNING: SWANK also exports the following symbols:
(SWANK:SIMPLE-COMPLETIONS SWANK:PPRINT-EVAL SWANK:INSPECTOR-RANGE
SWANK:LISTENER-EVAL SWANK:SLDB-ABORT SWANK:STATE-STACK
SWANK:START-SWANK-SERVER-IN-THREAD SWANK:DESCRIBE-SYMBOL
SWANK:INTERACTIVE-EVAL SWANK:SLDB-BREAK-WITH-DEFAULT-DEBUGGER
SWANK:KILL-NTH-THREAD SWANK:PPRINT-INSPECTOR-PART SWANK:SWANK-REQUIRE
SWANK:SET-PACKAGE SWANK:SWANK-MACROEXPAND SWANK:INVOKE-NTH-RESTART-FOR-EMACS
SWANK:COMPILE-FILE-IF-NEEDED SWANK:INSPECTOR-POP SWANK:LOAD-FILE
SWANK:RE-EVALUATE-DEFVAR SWANK:VALUE-FOR-EDITING
SWANK:SLDB-RETURN-FROM-FRAME SWANK:INSPECT-FRAME-VAR SWANK:UNTRACE-ALL
SWANK:SLDB-DISASSEMBLE SWANK:SWANK-MACROEXPAND-ALL
SWANK:PPRINT-EVAL-STRING-IN-FRAME SWANK:FIND-DEFINITION-FOR-THING
SWANK:QUIT-INSPECTOR SWANK:SLDB-OUT SWANK:APROPOS-LIST-FOR-EMACS
SWANK:INIT-INSPECTOR SWANK:FRAME-LOCALS-AND-CATCH-TAGS
SWANK:TOGGLE-PROFILE-FDEFINITION SWANK:OPERATOR-ARGLIST
SWANK:UNDEFINE-FUNCTION SWANK:SWANK-COMPILER-MACROEXPAND-1
SWANK:INSPECTOR-TOGGLE-VERBOSE SWANK:DESCRIBE-FUNCTION SWANK:IO-SPEED-TEST
SWANK:SIMPLE-BREAK SWANK:INSPECTOR-CALL-NTH-ACTION SWANK:BACKTRACE
SWANK:EVAL-AND-GRAB-OUTPUT SWANK:LIST-THREADS
SWANK:UPDATE-INDENTATION-INFORMATION
SWANK:COMPILE-MULTIPLE-STRINGS-FOR-EMACS SWANK:INSPECT-IN-FRAME
SWANK:REDIRECT-TRACE-OUTPUT SWANK:SWANK-COMPILER-MACROEXPAND
SWANK:QUIT-THREAD-BROWSER SWANK:INTERACTIVE-EVAL-REGION
SWANK:INSPECT-NTH-PART SWANK:LIST-ALL-PACKAGE-NAMES SWANK:DISASSEMBLE-SYMBOL
SWANK:EVAL-STRING-IN-FRAME SWANK:COMPILE-STRING-FOR-EMACS SWANK:PING
SWANK:INSPECTOR-NEXT SWANK:SWANK-TOGGLE-TRACE
SWANK:DESCRIBE-DEFINITION-FOR-EMACS SWANK:COMMIT-EDITED-VALUE
SWANK:DEBUG-NTH-THREAD SWANK:DOCUMENTATION-SYMBOL
SWANK:DEBUGGER-INFO-FOR-EMACS SWANK:DESCRIBE-INSPECTEE SWANK:XREF
SWANK:SLDB-NEXT SWANK:FIND-SOURCE-LOCATION-FOR-EMACS
SWANK:INSPECT-CURRENT-CONDITION SWANK:SLDB-CONTINUE SWANK:CONNECTION-INFO
SWANK:FIND-DEFINITIONS-FOR-EMACS SWANK:MOP SWANK:THROW-TO-TOPLEVEL
SWANK:INSPECTOR-NTH-PART SWANK:SWANK-MACROEXPAND-1 SWANK:INVOKE-NTH-RESTART
SWANK:INSPECTOR-REINSPECT SWANK:COMPILE-FILE-FOR-EMACS)
See also:
The ANSI Standard, Macro DEFPACKAGE
WARNING: These Swank interfaces are unimplemented:
(ALL-THREADS CALLS-WHO DISASSEMBLE-FRAME INTERRUPT-THREAD RECEIVE-IF
SAVE-IMAGE SEND SLDB-BREAK-AT-START SLDB-BREAK-ON-RETURN SPAWN
WHO-SPECIALIZES)
;; Swank started at port: 1582.
wait-for-event: (:EMACS-REX . SWANK::_) NIL
READ: "(:emacs-rex (swank:connection-info) nil t 1)
"
dispatch-event: (:EMACS-REX (SWANK:CONNECTION-INFO) NIL T 1)
send-event: 0 (:EMACS-REX (SWANK:CONNECTION-INFO) NIL 1)
dispatch-event: (: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) ("prepare-for-fast-read-byte" . 1) ("dx-flet" . 1) ("prepare-for-fast-read-char" . 1) ("dx-let" . 1) ("collect" . 1) ("maybe-pseudo-atomic" . 1) ("with-cycle-counter" . 0) ("with-empty-tn@fp-top" . 1) ("with-tn@fp-top" . 1) ("with-fixed-allocation" . 1) ("descend-into" . 1) ("with-single-package-locked-error" . 1) ("with-circularity-detection" . 1) ("number-dispatch" . 1) ("with-local-interrupts" . 0) ("allow-with-interrupts" . 0) ("without-gcing" . 0) ("with-deadline" . 1) ("without-interrupts" . 0) ("with-interrupts" . 0) ("with-pinned-objects" . 1) ("with-active-processes-lock" . 1) ("def-output-routines" . 1) ("with-default-decoding-replacement" . 1) ("with-c-strvec" . 1) ("with-stepping-enabled" . 0) ("define-sequence-traverser" . 2) ("output-wrapper" . 1) ("string-dispatch" . 2) ("with-finalizer-store-lock" . 0) ("with-pathname" . 1) ("with-available-buffers-lock" . 1) ("with-stepping-disabled" . 0) ("with-host" . 1) ("with-symbol" . 1) ("with-push-char" . 1) ("lambda-with-lexenv" . 3) ("with-hash-table-locks" . 1) ("def-output-routines/variable-width" . 1) ("with-reader" . 1) ("input-wrapper" . 1) ("with-packages" . 1) ("with-standard-replacement-character" . 0) ("with-native-pathname" . 1) ("with-descriptor-handlers" . 0) ("input-wrapper/variable-width" . 1) ("output-wrapper/variable-width" . 1) ("with-concurrent-access-check" . 2) ("with-scheduler-lock" . 1) ("handling-end-of-the-world" . 0) ("do-debug-block-locations" . 1) ("do-debug-fun-vars" . 1) ("do-debug-fun-blocks" . 1) ("maybe-with-pinned-objects" . 2) ("define-alien-type-translator" . 2) ("bind-fast-lexical-method-functions" . 1) ("pv-binding" . 1) ("dolist-carefully" . 1) ("bind-args" . 1) ("with-dfun-wrappers" . 3) ("simple-lexical-method-functions" . 1) ("with-pcl-lock" . 0) ("doplist" . 2) ("with-type-checked" . 1) ("pv-binding1" . 1) ("dotimes-fixnum" . 1) ("dfun-miss" . 1) ("fast-lexical-method-functions" . 1) ("bind-simple-lexical-method-functions" . 1) ("with-alien" . 1) ("define-alien-callback" . 3) ("alien-lambda" . 2) ("with-auxiliary-alien-types" . 1) ("define-instruction-macro" . 2) ("without-scheduling" . 1) ("assemble" . 1) ("do-sset-elements" . 1) ("note-dependencies" . 1) ("with-modified-segment-index-and-posn" . 1) ("sc-case" . 1) ("deftransform" . 2) ("define-vop" . 1) ("with-source-location" . 1) ("define-source-transform" . 2) ("defoptimizer" . 2) ("defknown" . 4) ("source-transform-lambda" . 1) ("define-move-fun" . 3) ("define-assembly-routine" . 2) ("def-ir1-translator" . 2) ("with-component-last-block" . 1) ("define-internal-pcl-function-name-syntax" . 1) ("do-nodes-carefully" . 1) ("do-ir2-blocks" . 1) ("with-fun-name-leaf" . 1) ("do-blocks" . 1) ("with-ir1-namespace" . 0) ("with-compilation-values" . 0) ("do-forms-from-info" . 1) ("with-compiler-io-syntax" . 0) ("do-packed-tns" . 1) ("do-live-tns" . 1) ("define-modular-fun-optimizer" . 2) ("do-eql-vars" . 1) ("do-nodes" . 1) ("do-sc-pairs" . 1) ("do-physenv-ir2-blocks" . 1) ("do-blocks-backwards" . 1) ("do-nodes-backwards" . 1) ("processing-decls" . 1) ("do-uses" . 1) ("with-fop-stack" . 1) ("expand-bind-defaults" . 2) ("def-format-directive" . 2) ("def-complex-format-directive" . 2) ("with-new-session" . 1) ("with-mutex" . 1) ("with-recursive-lock" . 1) ("with-spinlock" . 1) ("with-session-lock" . 1) ("with-system-mutex" . 1) ("with-all-threads-lock" . 0) ("with-recursive-spinlock" . 1) ("with-interruptions-lock" . 1) ("with-recursive-system-spinlock" . 1) ("with-system-spinlock" . 1) ("with-pretty-stream" . 1) ("with-sequence-iterator" . 2) ("dosequence" . 1) ("with-sequence-iterator-functions" . 2) ("with-new-definition-in-environment" . 1) ("with-augmented-environment" . 1) ("walker-environment-bind" . 1) ("program-destructuring-bind" . 2) ("with-process-times" . 1) ("with-sysfun" . 1) ("with-funcname" . 1) ("with-loop-list-collection-head" . 1) ("with-minimax-value" . 1) ("with-compilation-hooks" . 1) ("with-struct" . 2) ("with-debootstrapping" . 0) ("with-slime-output-stream" . 1) ("defimplementation" . 2) ("defsystem" . 1) ("with-hostent" . 2) ("with-wsa-data" . 2) ("with-sockaddr-in" . 2) ("with-array-data" . 1) ("with-protoent" . 2) ("with-in-addr" . 2) ("with-vector-sap" . 1) ("with-sockaddr-for" . 1) ("with-alien-stat" . 2) ("with-dirent" . 2) ("define-entry-point" . 2) ("with-growing-c-string" . 1) ("define-designator" . 2) ("with-slime-interrupts" . 0) ("with-buffer-syntax" . 1) ("with-connection" . 1) ("with-top-level-restart" . 1) ("without-slime-interrupts" . 0) ("with-describe-settings" . 1) ("defslimefun" . 2) ("do-symbols*" . 1) ("with-bindings" . 1) ("with-retry-restart" . 1) ("without-interrupts" . 0) ("with-thread-description" . 1) ("with-temp-package" . 1) ("with-swank-error-handler" . 1) ("with-struct*" . 1) ("with-panic-handler" . 1) ("with-io-redirection" . 1)))
WRITE: (: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) ("prepare-for-fast-read-byte" . 1) ("dx-flet" . 1) ("prepare-for-fast-read-char" . 1) ("dx-let" . 1) ("collect" . 1) ("maybe-pseudo-atomic" . 1) ("with-cycle-counter" . 0) ("with-empty-tn@fp-top" . 1) ("with-tn@fp-top" . 1) ("with-fixed-allocation" . 1) ("descend-into" . 1) ("with-single-package-locked-error" . 1) ("with-circularity-detection" . 1) ("number-dispatch" . 1) ("with-local-interrupts" . 0) ("allow-with-interrupts" . 0) ("without-gcing" . 0) ("with-deadline" . 1) ("without-interrupts" . 0) ("with-interrupts" . 0) ("with-pinned-objects" . 1) ("with-active-processes-lock" . 1) ("def-output-routines" . 1) ("with-default-decoding-replacement" . 1) ("with-c-strvec" . 1) ("with-stepping-enabled" . 0) ("define-sequence-traverser" . 2) ("output-wrapper" . 1) ("string-dispatch" . 2) ("with-finalizer-store-lock" . 0) ("with-pathname" . 1) ("with-available-buffers-lock" . 1) ("with-stepping-disabled" . 0) ("with-host" . 1) ("with-symbol" . 1) ("with-push-char" . 1) ("lambda-with-lexenv" . 3) ("with-hash-table-locks" . 1) ("def-output-routines/variable-width" . 1) ("with-reader" . 1) ("input-wrapper" . 1) ("with-packages" . 1) ("with-standard-replacement-character" . 0) ("with-native-pathname" . 1) ("with-descriptor-handlers" . 0) ("input-wrapper/variable-width" . 1) ("output-wrapper/variable-width" . 1) ("with-concurrent-access-check" . 2) ("with-scheduler-lock" . 1) ("handling-end-of-the-world" . 0) ("do-debug-block-locations" . 1) ("do-debug-fun-vars" . 1) ("do-debug-fun-blocks" . 1) ("maybe-with-pinned-objects" . 2) ("define-alien-type-translator" . 2) ("bind-fast-lexical-method-functions" . 1) ("pv-binding" . 1) ("dolist-carefully" . 1) ("bind-args" . 1) ("with-dfun-wrappers" . 3) ("simple-lexical-method-functions" . 1) ("with-pcl-lock" . 0) ("doplist" . 2) ("with-type-checked" . 1) ("pv-binding1" . 1) ("dotimes-fixnum" . 1) ("dfun-miss" . 1) ("fast-lexical-method-functions" . 1) ("bind-simple-lexical-method-functions" . 1) ("with-alien" . 1) ("define-alien-callback" . 3) ("alien-lambda" . 2) ("with-auxiliary-alien-types" . 1) ("define-instruction-macro" . 2) ("without-scheduling" . 1) ("assemble" . 1) ("do-sset-elements" . 1) ("note-dependencies" . 1) ("with-modified-segment-index-and-posn" . 1) ("sc-case" . 1) ("deftransform" . 2) ("define-vop" . 1) ("with-source-location" . 1) ("define-source-transform" . 2) ("defoptimizer" . 2) ("defknown" . 4) ("source-transform-lambda" . 1) ("define-move-fun" . 3) ("define-assembly-routine" . 2) ("def-ir1-translator" . 2) ("with-component-last-block" . 1) ("define-internal-pcl-function-name-syntax" . 1) ("do-nodes-carefully" . 1) ("do-ir2-blocks" . 1) ("with-fun-name-leaf" . 1) ("do-blocks" . 1) ("with-ir1-namespace" . 0) ("with-compilation-values" . 0) ("do-forms-from-info" . 1) ("with-compiler-io-syntax" . 0) ("do-packed-tns" . 1) ("do-live-tns" . 1) ("define-modular-fun-optimizer" . 2) ("do-eql-vars" . 1) ("do-nodes" . 1) ("do-sc-pairs" . 1) ("do-physenv-ir2-blocks" . 1) ("do-blocks-backwards" . 1) ("do-nodes-backwards" . 1) ("processing-decls" . 1) ("do-uses" . 1) ("with-fop-stack" . 1) ("expand-bind-defaults" . 2) ("def-format-directive" . 2) ("def-complex-format-directive" . 2) ("with-new-session" . 1) ("with-mutex" . 1) ("with-recursive-lock" . 1) ("with-spinlock" . 1) ("with-session-lock" . 1) ("with-system-mutex" . 1) ("with-all-threads-lock" . 0) ("with-recursive-spinlock" . 1) ("with-interruptions-lock" . 1) ("with-recursive-system-spinlock" . 1) ("with-system-spinlock" . 1) ("with-pretty-stream" . 1) ("with-sequence-iterator" . 2) ("dosequence" . 1) ("with-sequence-iterator-functions" . 2) ("with-new-definition-in-environment" . 1) ("with-augmented-environment" . 1) ("walker-environment-bind" . 1) ("program-destructuring-bind" . 2) ("with-process-times" . 1) ("with-sysfun" . 1) ("with-funcname" . 1) ("with-loop-list-collection-head" . 1) ("with-minimax-value" . 1) ("with-compilation-hooks" . 1) ("with-struct" . 2) ("with-debootstrapping" . 0) ("with-slime-output-stream" . 1) ("defimplementation" . 2) ("defsystem" . 1) ("with-hostent" . 2) ("with-wsa-data" . 2) ("with-sockaddr-in" . 2) ("with-array-data" . 1) ("with-protoent" . 2) ("with-in-addr" . 2) ("with-vector-sap" . 1) ("with-sockaddr-for" . 1) ("with-alien-stat" . 2) ("with-dirent" . 2) ("define-entry-point" . 2) ("with-growing-c-string" . 1) ("define-designator" . 2) ("with-slime-interrupts" . 0) ("with-buffer-syntax" . 1) ("with-connection" . 1) ("with-top-level-restart" . 1) ("without-slime-interrupts" . 0) ("with-describe-settings" . 1) ("defslimefun" . 2) ("do-symbols*" . 1) ("with-bindings" . 1) ("with-retry-restart" . 1) ("without-interrupts" . 0) ("with-thread-description" . 1) ("with-temp-package" . 1) ("with-swank-error-handler" . 1) ("with-struct*" . 1) ("with-panic-handler" . 1) ("with-io-redirection" . 1)))
dispatch-event: (:RETURN 0 (: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 :STACK-ALLOCATABLE-CLOSURES :ALIEN-CALLBACKS :CYCLE-COUNTER :LINKAGE-TABLE :OS-PROVIDES-DLOPEN :OS-PROVIDES-PUTWC) :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)
WRITE: (: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 :stack-allocatable-closures :alien-callbacks :cycle-counter :linkage-table :os-provides-dlopen :os-provides-putwc) :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)
wait-for-event: (:EMACS-REX . SWANK::_) NIL
READ: "(:emacs-rex (swank:operator-arglist \"error\" \"COMMON-LISP-USER\") \"COMMON-LISP-USER\" :repl-thread 2)
"
dispatch-event: (:EMACS-REX (SWANK:OPERATOR-ARGLIST "error" "COMMON-LISP-USER") "COMMON-LISP-USER" :REPL-THREAD 2)
send-event: 0 (:EMACS-REX (SWANK:OPERATOR-ARGLIST "error" "COMMON-LISP-USER") "COMMON-LISP-USER" 2)
dispatch-event: (:RETURN 0 (:OK "(error DATUM &REST ARGUMENTS)") 2)
WRITE: (:return (:ok "(error DATUM &REST ARGUMENTS)") 2)
wait-for-event: (:EMACS-REX . SWANK::_) NIL
READ: "(:emacs-rex (swank:listener-eval \"(error 'foo)
\") \"COMMON-LISP-USER\" :repl-thread 3)
"
dispatch-event: (:EMACS-REX (SWANK:LISTENER-EVAL "(error 'foo)
") "COMMON-LISP-USER" :REPL-THREAD 3)
send-event: 0 (:EMACS-REX (SWANK:LISTENER-EVAL "(error 'foo)
") "COMMON-LISP-USER" 3)
dispatch-event: (:DEBUG 0 1 ("Bad type argument:
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))
WRITE: (:debug 0 1 ("Bad type argument:
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))
dispatch-event: (:DEBUG-ACTIVATE 0 1 NIL)
WRITE: (:debug-activate 0 1 nil)
wait-for-event: (COMMON-LISP:OR (:EMACS-REX . SWANK::_) (:SLDB-RETURN 2)) NIL
READ: "(:emacs-rex (swank:throw-to-toplevel) nil 0 4)
"
dispatch-event: (:EMACS-REX (SWANK:THROW-TO-TOPLEVEL) NIL 0 4)
send-event: 0 (:EMACS-REX (SWANK:THROW-TO-TOPLEVEL) NIL 4)
dispatch-event: (:RETURN 0 (:ABORT) 4)
WRITE: (:return (:abort) 4)
dispatch-event: (:DEBUG-RETURN 0 1 NIL)
WRITE: (:debug-return 0 1 nil)
wait-for-event: (:SLDB-RETURN 2) T