Plaster
New
List
Login
text
apl
aspx
asterisk
brainfuck
c
c++hdr
c++src
cassandra
ceylon
clojure
clojurescript
cmake
cobol
coffeescript
common-lisp
crystal
csharp
css
cypher-query
cython
d
dart
diff
django
dockerfile
dylan
ebnf
ecl
ecmascript
edn
eiffel
ejs
elm
erb
erlang
ez80
factor
fcl
feature
forth
fortran
fragment
gfm
go
gql
groovy
gss
haml
handlebars-template
haskell
haxe
hive
html
http
httpd-php
httpd-php-open
hxml
ini
java
javascript
json
jsp
jsx
julia
kotlin
latex
less
literate-haskell
lua
mariadb
markdown
mbox
mirc
mscgen
msgenny
mssql
mumps
mysql
n-triples
nesc
nginx-conf
nsis
objectivec
octave
oz
pascal
perl
pgp
pgp-keys
pgp-signature
pgsql
php
pig
plsql
properties
protobuf
puppet
python
q
rpm-changes
rpm-spec
rsrc
ruby
rustsrc
sas
sass
scala
scheme
scss
sieve
slim
smarty
solr
soy
sparql-query
spreadsheet
sql
squirrel
stex
styl
swift
systemverilog
tcl
textile
tiddlywiki
tiki
tlv
tornado
ttcn-asn
ttcn-cfg
turtle
twig
typescript
typescript-jsx
vb
vbscript
velocity
verilog
vertex
vhdl
vue
webidl
xml
xml-dtd
xquery
xu
yaml
z80
default
Annotating paste
2201
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 (#<THREAD "repl-thread" RUNNING {100B2C9EC3}>) Backtrace: 0: ((SB-PCL::EMF COMPUTE-EFFECTIVE-SLOT-DEFINITION) #<unused argument> #<unused argument> #<STANDARD-UNIT-CLASS GBBOPEN-USER::BUNNY> INSTANCE-NAME (#<DIRECT-NONLINK-SLOT-DEFINITION GBBOPEN:INSTANCE-NAME>.. Locals: SB-PCL::.ARG0. = #<STANDARD-UNIT-CLASS GBBOPEN-USER::BUNNY> SB-PCL::.ARG1. = INSTANCE-NAME SB-PCL::.ARG2. = (#<DIRECT-NONLINK-SLOT-DEFINITION GBBOPEN:INSTANCE-NAME> #<STANDARD-DIRECT-SLOT-DEFINITION GBBOPEN:INSTANCE-NAME>) 1: (SB-PCL::STD-COMPUTE-SLOTS #<STANDARD-UNIT-CLASS GBBOPEN-USER::BUNNY>) Locals: CLASS = #<STANDARD-UNIT-CLASS GBBOPEN-USER::BUNNY> 2: ((:METHOD COMPUTE-SLOTS :AROUND (STANDARD-CLASS)) #<STANDARD-UNIT-CLASS GBBOPEN-USER::BUNNY>) [fast-method] Locals: SB-PCL::.NEXT-METHOD-CALL. = #S(SB-PCL::FAST-METHOD-CALL :FUNCTION #<FUNCTION (SB-PCL::FAST-METHOD COMPUTE-SLOTS (STANDARD-CLASS))> :PV NIL :NEXT-METHOD-CALL NIL :ARG-INFO (1)) CLASS = #<STANDARD-UNIT-CLASS GBBOPEN-USER::BUNNY> 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 = #<SB-THREAD:MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {100B2C9EC3}>> 5: (SB-THREAD::CALL-WITH-RECURSIVE-LOCK #<FUNCTION (FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN SB-PCL::UPDATE-CLASS) {7FD46575CDDB}> #<SB-THREAD:MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thre.. Locals: GOT-IT = NIL MUTEX = #<SB-THREAD:MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {100B2C9EC3}>> SB-C::THING = #<FUNCTION (FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN SB-PCL::UPDATE-CLASS) {7FD46575CDDB}> TIMEOUT = NIL WAITP = T 6: ((LABELS SB-PCL::REC :IN SB-PCL::UPDATE-CLASS) #<STANDARD-UNIT-CLASS GBBOPEN-USER::BUNNY> NIL (#<STANDARD-UNIT-CLASS GBBOPEN:STANDARD-UNIT-INSTANCE> #<STANDARD-CLASS GBBOPEN:DELETED/NON-DELETED-UNIT-I.. Locals: CLASS = #<STANDARD-UNIT-CLASS GBBOPEN-USER::BUNNY> #:G0 = NIL SEEN = (#<STANDARD-UNIT-CLASS GBBOPEN:STANDARD-UNIT-INSTANCE> #<STANDARD-CLASS GBBOPEN:DELETED/NON-DELETED-UNIT-INSTANCE> #<STANDARD-CLASS GBBOPEN-TOOLS:STANDARD-GBBOPEN-INSTANCE>) 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 = #<SB-THREAD:MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {100B2C9EC3}>> 9: (SB-THREAD::CALL-WITH-RECURSIVE-LOCK #<FUNCTION (FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN SB-PCL::UPDATE-CLASS) {7FD46575CFDB}> #<SB-THREAD:MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thre.. Locals: GOT-IT = NIL MUTEX = #<SB-THREAD:MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {100B2C9EC3}>> SB-C::THING = #<FUNCTION (FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN SB-PCL::UPDATE-CLASS) {7FD46575CFDB}> TIMEOUT = NIL WAITP = T 10: ((LABELS SB-PCL::REC :IN SB-PCL::UPDATE-CLASS) #<STANDARD-UNIT-CLASS GBBOPEN:STANDARD-UNIT-INSTANCE> NIL (#<STANDARD-CLASS GBBOPEN:DELETED/NON-DELETED-UNIT-INSTANCE> #<STANDARD-CLASS GBBOPEN-TOOLS:STA.. Locals: CLASS = #<STANDARD-UNIT-CLASS GBBOPEN:STANDARD-UNIT-INSTANCE> #:G0 = NIL SEEN = (#<STANDARD-CLASS GBBOPEN:DELETED/NON-DELETED-UNIT-INSTANCE> #<STANDARD-CLASS GBBOPEN-TOOLS:STANDARD-GBBOPEN-INSTANCE>) 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 = #<SB-THREAD:MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {100B2C9EC3}>> 13: (SB-THREAD::CALL-WITH-RECURSIVE-LOCK #<FUNCTION (FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN SB-PCL::UPDATE-CLASS) {7FD46575D1DB}> #<SB-THREAD:MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thre.. Locals: GOT-IT = NIL MUTEX = #<SB-THREAD:MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {100B2C9EC3}>> SB-C::THING = #<FUNCTION (FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN SB-PCL::UPDATE-CLASS) {7FD46575D1DB}> TIMEOUT = NIL WAITP = T 14: ((LABELS SB-PCL::REC :IN SB-PCL::UPDATE-CLASS) #<STANDARD-CLASS GBBOPEN:DELETED/NON-DELETED-UNIT-INSTANCE> NIL (#<STANDARD-CLASS GBBOPEN-TOOLS:STANDARD-GBBOPEN-INSTANCE>)) Locals: CLASS = #<STANDARD-CLASS GBBOPEN:DELETED/NON-DELETED-UNIT-INSTANCE> #:G0 = NIL SEEN = (#<STANDARD-CLASS GBBOPEN-TOOLS:STANDARD-GBBOPEN-INSTANCE>) 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 = #<SB-THREAD:MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {100B2C9EC3}>> 17: (SB-THREAD::CALL-WITH-RECURSIVE-LOCK #<FUNCTION (FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN SB-PCL::UPDATE-CLASS) {7FD46575D3DB}> #<SB-THREAD:MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thre.. Locals: GOT-IT = T MUTEX = #<SB-THREAD:MUTEX "World Lock" owner: #<SB-THREAD:THREAD "repl-thread" RUNNING {100B2C9EC3}>> SB-C::THING = #<FUNCTION (FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN SB-PCL::UPDATE-CLASS) {7FD46575D3DB}> TIMEOUT = NIL WAITP = T 18: ((LABELS SB-PCL::REC :IN SB-PCL::UPDATE-CLASS) #<STANDARD-CLASS GBBOPEN-TOOLS:STANDARD-GBBOPEN-INSTANCE> T NIL) Locals: CLASS = #<STANDARD-CLASS GBBOPEN-TOOLS:STANDARD-GBBOPEN-INSTANCE> #:G0 = T SEEN = NIL 19: (SB-PCL::CPL-OR-NIL #<STANDARD-CLASS GBBOPEN-TOOLS:STANDARD-GBBOPEN-INSTANCE>) Locals: CLASS = #<STANDARD-CLASS GBBOPEN-TOOLS:STANDARD-GBBOPEN-INSTANCE> 20: (SB-PCL::SAUT-NOT-CLASS (CLASS #<STANDARD-CLASS GBBOPEN-TOOLS:STANDARD-GBBOPEN-INSTANCE>) (CLASS #<STANDARD-CLASS GBBOPEN:GBBOPEN-NODE-STATE>)) Locals: NTYPE = (CLASS #<STANDARD-CLASS GBBOPEN:GBBOPEN-NODE-STATE>) SPECL = (CLASS #<STANDARD-CLASS GBBOPEN-TOOLS:STANDARD-GBBOPEN-INSTANCE>) 21: (SB-PCL::SAUT-NOT (CLASS #<STANDARD-CLASS GBBOPEN-TOOLS:STANDARD-GBBOPEN-INSTANCE>) (NOT (CLASS #<STANDARD-CLASS GBBOPEN:GBBOPEN-NODE-STATE>))) Locals: SPECL = (CLASS #<STANDARD-CLASS GBBOPEN-TOOLS:STANDARD-GBBOPEN-INSTANCE>) TYPE = (NOT (CLASS #<STANDARD-CLASS GBBOPEN:GBBOPEN-NODE-STATE>)) 22: (SB-PCL::SAUT-AND (CLASS #<STANDARD-CLASS GBBOPEN-TOOLS:STANDARD-GBBOPEN-INSTANCE>) (AND (NOT (CLASS #<STANDARD-CLASS GBBOPEN:GBBOPEN-NODE-STATE>)) (CLASS #<INSTANCE-EVENT-CLASS GBBOPEN:MULTIPLE-INSTA.. Locals: APPLICABLE = NIL POSSIBLY-APPLICABLE = T SPECL = (CLASS #<STANDARD-CLASS GBBOPEN-TOOLS:STANDARD-GBBOPEN-INSTANCE>) TYPE = (AND (NOT (CLASS #<STANDARD-CLASS GBBOPEN:GBBOPEN-NODE-STATE>)) (CLASS #<INSTANCE-EVENT-CLASS GBBOPEN:MULTIPLE-INSTANCE-EVENT>) (CLASS #<SPACE-INSTANCE-EVENT-CLASS GBBOPEN:SPACE-INSTANCE-EVENT>) ..) 23: ((LABELS SB-PCL::DO-METHODS :IN SB-PCL::GENERATE-DISCRIMINATION-NET-INTERNAL) (0 1) (#<STANDARD-METHOD GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (STANDARD-GBBOPEN-INSTANCE T) {100EBCC433}>) (AND (NOT (CLASS .. Locals: CONTENDERS = (#<STANDARD-METHOD GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (STANDARD-GBBOPEN-INSTANCE T) {100EBCC433}>) KNOWN-TYPE = (AND (NOT (CLASS #<STANDARD-CLASS GBBOPEN:GBBOPEN-NODE-STATE>)) (CLASS #<INSTANCE-EVENT-CLASS GBBOPEN:MULTIPLE-INSTANCE-EVENT>) (CLASS #<SPACE-INSTANCE-EVENT-CLASS GBBOPEN:SPACE-INSTANCE-EVENT>) ..) KNOWN-TYPES = NIL METHOD = #<STANDARD-METHOD GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (STANDARD-GBBOPEN-INSTANCE T) {100EBCC433}> P-TAIL = (0 1) TYPE = (CLASS #<STANDARD-CLASS GBBOPEN-TOOLS:STANDARD-GBBOPEN-INSTANCE>) WINNERS = (#<STANDARD-METHOD GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (KSA T) {1012403F13}> #<STANDARD-METHOD GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (STANDARD-UNIT-INSTANCE T) {1010BCD223}> ..) 24: ((LABELS SB-PCL::DO-METHODS :IN SB-PCL::GENERATE-DISCRIMINATION-NET-INTERNAL) (0 1) (#<STANDARD-METHOD GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (GBBOPEN-NODE-STATE T) {100F522453}> #<STANDARD-METHOD GBBOPEN.. Locals: CONTENDERS = (#<STANDARD-METHOD GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (GBBOPEN-NODE-STATE T) {100F522453}> #<STANDARD-METHOD GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (STANDARD-GBBOPEN-INSTANCE T) {100EBCC433}>) KNOWN-TYPE = (AND (CLASS #<INSTANCE-EVENT-CLASS GBBOPEN:MULTIPLE-INSTANCE-EVENT>) (CLASS #<SPACE-INSTANCE-EVENT-CLASS GBBOPEN:SPACE-INSTANCE-EVENT>) (CLASS #<INSTANCE-EVENT-CLASS GBBOPEN:LINK/NONLINK-SLOT-EVENT>) .. KNOWN-TYPES = NIL P-TAIL = (0 1) WINNERS = (#<STANDARD-METHOD GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (KSA T) {1012403F13}> #<STANDARD-METHOD GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (STANDARD-UNIT-INSTANCE T) {1010BCD223}> ..) 25: ((LABELS SB-PCL::DO-METHODS :IN SB-PCL::GENERATE-DISCRIMINATION-NET-INTERNAL) (0 1) (#<STANDARD-METHOD GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (MULTIPLE-INSTANCE-EVENT T) {10105CD3F3}> #<STANDARD-METHOD GB.. Locals: CONTENDERS = (#<STANDARD-METHOD GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (MULTIPLE-INSTANCE-EVENT T) {10105CD3F3}> #<STANDARD-METHOD GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (SINGLE-INSTANCE-EVENT T) {10105C46C3}> ..) KNOWN-TYPE = (AND (CLASS #<SPACE-INSTANCE-EVENT-CLASS GBBOPEN:SPACE-INSTANCE-EVENT>) (CLASS #<INSTANCE-EVENT-CLASS GBBOPEN:LINK/NONLINK-SLOT-EVENT>) (CLASS #<STANDARD-CLASS GBBOPEN:STANDARD-LINK-POINTER>) ..) KNOWN-TYPES = NIL METHOD = #<STANDARD-METHOD GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (MULTIPLE-INSTANCE-EVENT T) {10105CD3F3}> P-TAIL = (0 1) TYPE = (CLASS #<INSTANCE-EVENT-CLASS GBBOPEN:MULTIPLE-INSTANCE-EVENT>) WINNERS = (#<STANDARD-METHOD GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (KSA T) {1012403F13}> #<STANDARD-METHOD GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (STANDARD-UNIT-INSTANCE T) {1010BCD223}> ..) 26: ((LABELS SB-PCL::DO-METHODS :IN SB-PCL::GENERATE-DISCRIMINATION-NET-INTERNAL) (0 1) (#<STANDARD-METHOD GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (SPACE-INSTANCE-EVENT T) {101060E793}> #<STANDARD-METHOD GBBOP.. Locals: CONTENDERS = (#<STANDARD-METHOD GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (SPACE-INSTANCE-EVENT T) {101060E793}> #<STANDARD-METHOD GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (MULTIPLE-INSTANCE-EVENT T) {10105CD3F3}> ..) KNOWN-TYPE = (AND (CLASS #<INSTANCE-EVENT-CLASS GBBOPEN:LINK/NONLINK-SLOT-EVENT>) (CLASS #<STANDARD-CLASS GBBOPEN:STANDARD-LINK-POINTER>) (CLASS #<STANDARD-CLASS GBBOPEN:DELETED-UNIT-INSTANCE>) ..) KNOWN-TYPES = NIL METHOD = #<STANDARD-METHOD GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (SPACE-INSTANCE-EVENT T) {101060E793}> P-TAIL = (0 1) TYPE = (CLASS #<SPACE-INSTANCE-EVENT-CLASS GBBOPEN:SPACE-INSTANCE-EVENT>) WINNERS = (#<STANDARD-METHOD GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (KSA T) {1012403F13}> #<STANDARD-METHOD GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (STANDARD-UNIT-INSTANCE T) {1010BCD223}> ..) 27: ((LABELS SB-PCL::DO-METHODS :IN SB-PCL::GENERATE-DISCRIMINATION-NET-INTERNAL) (0 1) (#<STANDARD-METHOD GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (LINK/NONLINK-SLOT-EVENT T) {1010633823}> #<STANDARD-METHOD GB.. Locals: CONTENDERS = (#<STANDARD-METHOD GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (LINK/NONLINK-SLOT-EVENT T) {1010633823}> #<STANDARD-METHOD GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (SPACE-INSTANCE-EVENT T) {101060E793}> ..) KNOWN-TYPE = (AND (CLASS #<STANDARD-CLASS GBBOPEN:STANDARD-LINK-POINTER>) (CLASS #<STANDARD-CLASS GBBOPEN:DELETED-UNIT-INSTANCE>) (CLASS #<STANDARD-KSA-CLASS AGENDA-SHELL:KSA>)) KNOWN-TYPES = NIL METHOD = #<STANDARD-METHOD GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (LINK/NONLINK-SLOT-EVENT T) {1010633823}> P-TAIL = (0 1) TYPE = (CLASS #<INSTANCE-EVENT-CLASS GBBOPEN:LINK/NONLINK-SLOT-EVENT>) WINNERS = (#<STANDARD-METHOD GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (KSA T) {1012403F13}> #<STANDARD-METHOD GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (STANDARD-UNIT-INSTANCE T) {1010BCD223}> ..) 28: ((LABELS SB-PCL::DO-METHODS :IN SB-PCL::GENERATE-DISCRIMINATION-NET-INTERNAL) (0 1) (#<STANDARD-METHOD GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (STANDARD-LINK-POINTER T) {101069C453}> #<STANDARD-METHOD GBBO.. Locals: CONTENDERS = (#<STANDARD-METHOD GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (STANDARD-LINK-POINTER T) {101069C453}> #<STANDARD-METHOD GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (LINK/NONLINK-SLOT-EVENT T) {1010633823}> ..) KNOWN-TYPE = (AND (CLASS #<STANDARD-CLASS GBBOPEN:DELETED-UNIT-INSTANCE>) (CLASS #<STANDARD-KSA-CLASS AGENDA-SHELL:KSA>)) KNOWN-TYPES = NIL METHOD = #<STANDARD-METHOD GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (STANDARD-LINK-POINTER T) {101069C453}> P-TAIL = (0 1) TYPE = (CLASS #<STANDARD-CLASS GBBOPEN:STANDARD-LINK-POINTER>) WINNERS = (#<STANDARD-METHOD GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (KSA T) {1012403F13}> #<STANDARD-METHOD GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (STANDARD-UNIT-INSTANCE T) {1010BCD223}> ..) 29: ((LABELS SB-PCL::DO-METHODS :IN SB-PCL::GENERATE-DISCRIMINATION-NET-INTERNAL) (0 1) (#<STANDARD-METHOD GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (DELETED-UNIT-INSTANCE T) {1010B6E453}> #<STANDARD-METHOD GBBO.. Locals: CONTENDERS = (#<STANDARD-METHOD GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (DELETED-UNIT-INSTANCE T) {1010B6E453}> #<STANDARD-METHOD GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (STANDARD-LINK-POINTER T) {101069C453}> ..) KNOWN-TYPE = (CLASS #<STANDARD-KSA-CLASS AGENDA-SHELL:KSA>) KNOWN-TYPES = NIL METHOD = #<STANDARD-METHOD GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (DELETED-UNIT-INSTANCE T) {1010B6E453}> P-TAIL = (0 1) TYPE = (CLASS #<STANDARD-CLASS GBBOPEN:DELETED-UNIT-INSTANCE>) WINNERS = (#<STANDARD-METHOD GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (KSA T) {1012403F13}> #<STANDARD-METHOD GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (STANDARD-UNIT-INSTANCE T) {1010BCD223}>) 30: ((LABELS SB-PCL::DO-METHODS :IN SB-PCL::GENERATE-DISCRIMINATION-NET-INTERNAL) (0 1) (#<STANDARD-METHOD GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (KSA T) {1012403F13}> #<STANDARD-METHOD GBBOPEN-TOOLS:PRINT-IN.. Locals: CONTENDERS = (#<STANDARD-METHOD GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (KSA T) {1012403F13}> #<STANDARD-METHOD GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (STANDARD-UNIT-INSTANCE T) {1010BCD223}> ..) KNOWN-TYPE = T KNOWN-TYPES = NIL METHOD = #<STANDARD-METHOD GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (KSA T) {1012403F13}> P-TAIL = (0 1) TYPE = (CLASS #<STANDARD-KSA-CLASS AGENDA-SHELL:KSA>) WINNERS = NIL 31: (SB-PCL::DISPATCH-DFUN-COST #<STANDARD-GENERIC-FUNCTION GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (10)> 60) Locals: GF = #<STANDARD-GENERIC-FUNCTION GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (10)> LIMIT = 60 32: (SB-PCL::USE-DISPATCH-DFUN-P #<STANDARD-GENERIC-FUNCTION GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (10)> NIL) Locals: #:G0 = NIL GF = #<STANDARD-GENERIC-FUNCTION GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (10)> 33: (SB-PCL::MAKE-CHECKING-DFUN #<STANDARD-GENERIC-FUNCTION GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (10)> #S(SB-PCL::FAST-METHOD-CALL :FUNCTION #<FUNCTION (SB-PCL::FAST-METHOD PRINT-INSTANCE-SLOTS (STANDARD-UN.. Locals: CACHE = NIL FUNCTION = #S(SB-PCL::FAST-METHOD-CALL ..) GENERIC-FUNCTION = #<STANDARD-GENERIC-FUNCTION GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (10)> 34: (SB-PCL::INITIAL-DFUN #<STANDARD-GENERIC-FUNCTION GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (10)> (#<KS BUNNY-ALERT-KS> #<SB-IMPL::STRING-OUTPUT-STREAM {7FD46575DD53}>)) Locals: ARGS = (#<KS BUNNY-ALERT-KS> #<SB-IMPL::STRING-OUTPUT-STREAM {7FD46575DD53}>) GF = #<STANDARD-GENERIC-FUNCTION GBBOPEN-TOOLS:PRINT-INSTANCE-SLOTS (10)> 35: ((FLET SB-IMPL::PRINT-DESCRIPTION :IN SB-IMPL::%PRINT-UNREADABLE-OBJECT)) 36: (SB-IMPL::%PRINT-UNREADABLE-OBJECT #<KS BUNNY-ALERT-KS> #<SB-IMPL::STRING-OUTPUT-STREAM {7FD46575DD53}> 0 #<FUNCTION (FLET "THUNK" :IN PRINT-OBJECT) {7FD46575DC8B}>) 37: ((:METHOD PRINT-OBJECT (STANDARD-GBBOPEN-INSTANCE T)) #<KS BUNNY-ALERT-KS> #<SB-IMPL::STRING-OUTPUT-STREAM {7FD46575DD53}>) [fast-method] 38: ((LABELS SB-IMPL::HANDLE-IT :IN SB-KERNEL:OUTPUT-OBJECT) #<SB-IMPL::STRING-OUTPUT-STREAM {7FD46575DD53}>) 39: (SB-INT:STRINGIFY-OBJECT #<KS BUNNY-ALERT-KS>) 40: (PRIN1-TO-STRING #<KS BUNNY-ALERT-KS>) 41: (SWANK::PRESENT-REPL-RESULTS (#<KS BUNNY-ALERT-KS>)) 42: ((LAMBDA NIL :IN SWANK-REPL::REPL-EVAL)) 43: (SWANK-REPL::TRACK-PACKAGE #<FUNCTION (LAMBDA NIL :IN SWANK-REPL::REPL-EVAL) {10130046DB}>) 44: (SWANK::CALL-WITH-RETRY-RESTART "Retry SLIME REPL evaluation request." #<FUNCTION (LAMBDA NIL :IN SWANK-REPL::REPL-EVAL) {101300467B}>) 45: (SWANK::CALL-WITH-BUFFER-SYNTAX NIL #<FUNCTION (LAMBDA NIL :IN SWANK-REPL::REPL-EVAL) {101300465B}>) 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 #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK> #<FUNCTION (LAMBDA NIL :IN SWANK::HANDLE-REQUESTS) {100B2D802B}>) 54: ((FLET SWANK/BACKEND:CALL-WITH-DEBUGGER-HOOK :IN "/home/death/quicklisp/local-projects/slime/swank/sbcl.lisp") #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK> #<FUNCTION (LAMBDA NIL :IN SWANK::HANDLE-REQUESTS) .. 55: (SWANK::CALL-WITH-BINDINGS ((*STANDARD-INPUT* . #<SWANK/GRAY::SLIME-INPUT-STREAM {100B1AB323}>)) #<FUNCTION (LAMBDA NIL :IN SWANK::HANDLE-REQUESTS) {100B2D804B}>) 56: (SWANK::HANDLE-REQUESTS #<SWANK::MULTITHREADED-CONNECTION {10051B3893}> 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")