break [Condition of type SIMPLE-CONDITION] Restarts: 0: [CONTINUE] Return from BREAK. 1: [RETRY] Retry SLIME REPL evaluation request. 2: [*ABORT] Return to SLIME's top level. 3: [ABORT] abort thread (#) Backtrace: 0: ((SB-PCL::EMF COMPUTE-EFFECTIVE-SLOT-DEFINITION) # # # INSTANCE-NAME (#.. Locals: SB-PCL::.ARG0. = # SB-PCL::.ARG1. = INSTANCE-NAME SB-PCL::.ARG2. = (# #) 1: (SB-PCL::STD-COMPUTE-SLOTS #) Locals: CLASS = # 2: ((:METHOD COMPUTE-SLOTS :AROUND (STANDARD-CLASS)) #) [fast-method] Locals: SB-PCL::.NEXT-METHOD-CALL. = #S(SB-PCL::FAST-METHOD-CALL :FUNCTION # :PV NIL :NEXT-METHOD-CALL NIL :ARG-INFO (1)) CLASS = # 3: ((FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN SB-PCL::UPDATE-CLASS)) [No Locals] 4: ((FLET "WITHOUT-INTERRUPTS-BODY-11" :IN SB-THREAD::CALL-WITH-RECURSIVE-LOCK)) Locals: GOT-IT = NIL MUTEX = #> 5: (SB-THREAD::CALL-WITH-RECURSIVE-LOCK # #> SB-C::THING = # TIMEOUT = NIL WAITP = T 6: ((LABELS SB-PCL::REC :IN SB-PCL::UPDATE-CLASS) # NIL (# # #:G0 = NIL SEEN = (# # #) 7: ((FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN SB-PCL::UPDATE-CLASS)) [No Locals] 8: ((FLET "WITHOUT-INTERRUPTS-BODY-11" :IN SB-THREAD::CALL-WITH-RECURSIVE-LOCK)) Locals: GOT-IT = NIL MUTEX = #> 9: (SB-THREAD::CALL-WITH-RECURSIVE-LOCK # #> SB-C::THING = # TIMEOUT = NIL WAITP = T 10: ((LABELS SB-PCL::REC :IN SB-PCL::UPDATE-CLASS) # NIL (# # #:G0 = NIL SEEN = (# #) 11: ((FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN SB-PCL::UPDATE-CLASS)) [No Locals] 12: ((FLET "WITHOUT-INTERRUPTS-BODY-11" :IN SB-THREAD::CALL-WITH-RECURSIVE-LOCK)) Locals: GOT-IT = NIL MUTEX = #> 13: (SB-THREAD::CALL-WITH-RECURSIVE-LOCK # #> SB-C::THING = # TIMEOUT = NIL WAITP = T 14: ((LABELS SB-PCL::REC :IN SB-PCL::UPDATE-CLASS) # NIL (#)) Locals: CLASS = # #:G0 = NIL SEEN = (#) 15: ((FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN SB-PCL::UPDATE-CLASS)) [No Locals] 16: ((FLET "WITHOUT-INTERRUPTS-BODY-11" :IN SB-THREAD::CALL-WITH-RECURSIVE-LOCK)) Locals: GOT-IT = T MUTEX = #> 17: (SB-THREAD::CALL-WITH-RECURSIVE-LOCK # #> SB-C::THING = # TIMEOUT = NIL WAITP = T 18: ((LABELS SB-PCL::REC :IN SB-PCL::UPDATE-CLASS) # T NIL) Locals: CLASS = # #:G0 = T SEEN = NIL 19: (SB-PCL::CPL-OR-NIL #) Locals: CLASS = # 20: (SB-PCL::SAUT-NOT-CLASS (CLASS #) (CLASS #)) Locals: NTYPE = (CLASS #) SPECL = (CLASS #) 21: (SB-PCL::SAUT-NOT (CLASS #) (NOT (CLASS #))) Locals: SPECL = (CLASS #) TYPE = (NOT (CLASS #)) 22: (SB-PCL::SAUT-AND (CLASS #) (AND (NOT (CLASS #)) (CLASS #) TYPE = (AND (NOT (CLASS #)) (CLASS #) (CLASS #) ..) 23: ((LABELS SB-PCL::DO-METHODS :IN SB-PCL::GENERATE-DISCRIMINATION-NET-INTERNAL) (0 1) (#) (AND (NOT (CLASS .. Locals: CONTENDERS = (#) KNOWN-TYPE = (AND (NOT (CLASS #)) (CLASS #) (CLASS #) ..) KNOWN-TYPES = NIL METHOD = # P-TAIL = (0 1) TYPE = (CLASS #) WINNERS = (# # ..) 24: ((LABELS SB-PCL::DO-METHODS :IN SB-PCL::GENERATE-DISCRIMINATION-NET-INTERNAL) (0 1) (# # #) KNOWN-TYPE = (AND (CLASS #) (CLASS #) (CLASS #) .. KNOWN-TYPES = NIL P-TAIL = (0 1) WINNERS = (# # ..) 25: ((LABELS SB-PCL::DO-METHODS :IN SB-PCL::GENERATE-DISCRIMINATION-NET-INTERNAL) (0 1) (# # # ..) KNOWN-TYPE = (AND (CLASS #) (CLASS #) (CLASS #) ..) KNOWN-TYPES = NIL METHOD = # P-TAIL = (0 1) TYPE = (CLASS #) WINNERS = (# # ..) 26: ((LABELS SB-PCL::DO-METHODS :IN SB-PCL::GENERATE-DISCRIMINATION-NET-INTERNAL) (0 1) (# # # ..) KNOWN-TYPE = (AND (CLASS #) (CLASS #) (CLASS #) ..) KNOWN-TYPES = NIL METHOD = # P-TAIL = (0 1) TYPE = (CLASS #) WINNERS = (# # ..) 27: ((LABELS SB-PCL::DO-METHODS :IN SB-PCL::GENERATE-DISCRIMINATION-NET-INTERNAL) (0 1) (# # # ..) KNOWN-TYPE = (AND (CLASS #) (CLASS #) (CLASS #)) KNOWN-TYPES = NIL METHOD = # P-TAIL = (0 1) TYPE = (CLASS #) WINNERS = (# # ..) 28: ((LABELS SB-PCL::DO-METHODS :IN SB-PCL::GENERATE-DISCRIMINATION-NET-INTERNAL) (0 1) (# # # ..) KNOWN-TYPE = (AND (CLASS #) (CLASS #)) KNOWN-TYPES = NIL METHOD = # P-TAIL = (0 1) TYPE = (CLASS #) WINNERS = (# # ..) 29: ((LABELS SB-PCL::DO-METHODS :IN SB-PCL::GENERATE-DISCRIMINATION-NET-INTERNAL) (0 1) (# # # ..) KNOWN-TYPE = (CLASS #) KNOWN-TYPES = NIL METHOD = # P-TAIL = (0 1) TYPE = (CLASS #) WINNERS = (# #) 30: ((LABELS SB-PCL::DO-METHODS :IN SB-PCL::GENERATE-DISCRIMINATION-NET-INTERNAL) (0 1) (# # # ..) KNOWN-TYPE = T KNOWN-TYPES = NIL METHOD = # P-TAIL = (0 1) TYPE = (CLASS #) WINNERS = NIL 31: (SB-PCL::DISPATCH-DFUN-COST # 60) Locals: GF = # LIMIT = 60 32: (SB-PCL::USE-DISPATCH-DFUN-P # NIL) Locals: #:G0 = NIL GF = # 33: (SB-PCL::MAKE-CHECKING-DFUN # #S(SB-PCL::FAST-METHOD-CALL :FUNCTION # 34: (SB-PCL::INITIAL-DFUN # (# #)) Locals: ARGS = (# #) GF = # 35: ((FLET SB-IMPL::PRINT-DESCRIPTION :IN SB-IMPL::%PRINT-UNREADABLE-OBJECT)) 36: (SB-IMPL::%PRINT-UNREADABLE-OBJECT # # 0 #) 37: ((:METHOD PRINT-OBJECT (STANDARD-GBBOPEN-INSTANCE T)) # #) [fast-method] 38: ((LABELS SB-IMPL::HANDLE-IT :IN SB-KERNEL:OUTPUT-OBJECT) #) 39: (SB-INT:STRINGIFY-OBJECT #) 40: (PRIN1-TO-STRING #) 41: (SWANK::PRESENT-REPL-RESULTS (#)) 42: ((LAMBDA NIL :IN SWANK-REPL::REPL-EVAL)) 43: (SWANK-REPL::TRACK-PACKAGE #) 44: (SWANK::CALL-WITH-RETRY-RESTART "Retry SLIME REPL evaluation request." #) 45: (SWANK::CALL-WITH-BUFFER-SYNTAX NIL #) 46: (SWANK-REPL::REPL-EVAL "(define-ks bunny-alert-ks ..) 47: (SB-INT:SIMPLE-EVAL-IN-LEXENV (SWANK-REPL:LISTENER-EVAL "(define-ks bunny-alert-ks ..) 48: (EVAL (SWANK-REPL:LISTENER-EVAL "(define-ks bunny-alert-ks ..) 49: (SWANK:EVAL-FOR-EMACS (SWANK-REPL:LISTENER-EVAL "(define-ks bunny-alert-ks ..) 50: (SWANK::PROCESS-REQUESTS NIL) 51: ((LAMBDA NIL :IN SWANK::HANDLE-REQUESTS)) 52: ((LAMBDA NIL :IN SWANK::HANDLE-REQUESTS)) 53: (SWANK/SBCL::CALL-WITH-BREAK-HOOK # #) 54: ((FLET SWANK/BACKEND:CALL-WITH-DEBUGGER-HOOK :IN "/home/death/quicklisp/local-projects/slime/swank/sbcl.lisp") # #)) #) 56: (SWANK::HANDLE-REQUESTS # NIL) 57: ((FLET SB-UNIX::BODY :IN SB-THREAD::RUN)) 58: ((FLET "WITHOUT-INTERRUPTS-BODY-11" :IN SB-THREAD::RUN)) 59: ((FLET SB-UNIX::BODY :IN SB-THREAD::RUN)) 60: ((FLET "WITHOUT-INTERRUPTS-BODY-4" :IN SB-THREAD::RUN)) 61: (SB-THREAD::RUN) 62: ("foreign function: call_into_lisp") 63: ("foreign function: funcall1")