slyrus · September 19, 2018 03:34
diff --git a/gistfile1.txt b/gistfile1.txt
 The value
  10487096
 is not of type
  (INTEGER 0 0)
 when binding #:G2
   [Condition of type TYPE-ERROR]

 Restarts:
 0: [TRY-AGAIN] Try executing the command COM-ACCEPTING-INTERVAL again
 1: [ABORT] Return to application command loop
 2: [ABORT] Return to application command loop
 3: [RETRY] Retry SLIME REPL evaluation request.
 4: [*PROCESS-INPUT] Continue reading input.
 5: [ABORT] Return to SLIME's top level.
 --more--

 Backtrace:
  0: (XLIB:GCONTEXT-CLIP-MASK #<XLIB:GCONTEXT :0 10487067>)
  1: ((FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN CLIM-CLX::FONT-DRAW-GLYPHS))
  2: ((FLET "WITHOUT-INTERRUPTS-BODY-29" :IN SB-THREAD::CALL-WITH-RECURSIVE-LOCK))
  3: (SB-THREAD::CALL-WITH-RECURSIVE-LOCK #<CLOSURE (FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN CLIM-CLX::FONT-DRAW-GLYPHS) {67B914B}> #<SB-THREAD:MUTEX "Anonymous recursive lock" owner: #<SB-THREAD:THR..
  4: ((:METHOD CLIM-CLX::FONT-DRAW-GLYPHS (CLIM-FREETYPE::FREETYPE-FONT T T T T T)) #<CLIM-FREETYPE::FREETYPE-FONT FACE #<CLIM-FREETYPE::FREETYPE-FONT-FACE DejaVu Sans, Book> SIZE 12> #<XLIB:WINDOW :0 A004..
  5: ((SB-PCL::EMF CLIM-CLX::FONT-DRAW-GLYPHS) #<unused argument> #<unused argument> #<CLIM-FREETYPE::FREETYPE-FONT FACE #<CLIM-FREETYPE::FREETYPE-FONT-FACE DejaVu Sans, Book> SIZE 12> #<XLIB:WINDOW :0 A00..
  6: ((LAMBDA (SB-PCL::.ARG0. SB-PCL::.ARG1. SB-PCL::.ARG2. SB-PCL::.ARG3. SB-PCL::.ARG4. SB-PCL::.ARG5. SB-INT:&MORE SB-PCL::.MORE-CONTEXT. SB-PCL::.MORE-COUNT.)) #<CLIM-FREETYPE::FREETYPE-FONT FACE #<CLI..
  7: ((FLET SB-THREAD::WITH-MUTEX-THUNK :IN CLIM:MEDIUM-DRAW-TEXT*))
  8: ((FLET "WITHOUT-INTERRUPTS-BODY-1" :IN SB-THREAD::CALL-WITH-MUTEX))
  9: (SB-THREAD::CALL-WITH-MUTEX #<CLOSURE (FLET SB-THREAD::WITH-MUTEX-THUNK :IN CLIM:MEDIUM-DRAW-TEXT*) {67B9A5B}> #<SB-THREAD:MUTEX "draw-font" owner: #<SB-THREAD:THREAD "main thread" RUNNING {10005405B3..
 10: ((:METHOD CLIM:MEDIUM-DRAW-TEXT* (CLIM-CLX::CLX-MEDIUM T T T T T T T T T T T)) #<CLIM-CLX::CLX-MEDIUM {1012C9D0A3}> "-1.01" 28 59.0 0 NIL :LEFT :BASELINE #<unused argument> #<unused argument> #<unused..
 11: ((LAMBDA (SB-PCL::.ARG0. SB-PCL::.ARG1. SB-PCL::.ARG2. SB-PCL::.ARG3. SB-PCL::.ARG4. SB-PCL::.ARG5. SB-PCL::.ARG6. SB-PCL::.ARG7. SB-PCL::.ARG8. SB-PCL::.ARG9. SB-PCL::.ARG10. SB-PCL::.ARG11.)) #<CLIM..
 12: ((LABELS #:G13 :IN CLIM:MEDIUM-DRAW-TEXT*) #<CLIM-CLX::CLX-MEDIUM {1012C9D0A3}>)
 13: ((:METHOD CLIM-INTERNALS::INVOKE-WITH-SHEET-MEDIUM-BOUND (T NULL CLIM:PERMANENT-MEDIUM-SHEET-OUTPUT-MIXIN)) #<CLOSURE (LABELS #:G13 :IN CLIM:MEDIUM-DRAW-TEXT*) {67B9E1B}> #<unused argument> #<CLIM-CLX..
 14: ((:METHOD CLIM:MEDIUM-DRAW-TEXT* (CLIM:SHEET T T T T T T T T T T T)) #<CLIM-CLX::CLX-706-INTERACTOR-PANE CLIM-DEMO::INTERACTOR {1012C9C653}> "-1.01" 28 59.0 0 NIL :LEFT :BASELINE 29 59.0 NIL #<CLIM-IN..
 15: ((FLET CALL-NEXT-METHOD :IN "/Users/sly/projects/McCLIM/Core/clim-basic/recording.lisp"))
 16: ((:METHOD CLIM:MEDIUM-DRAW-TEXT* :AROUND (CLIM:OUTPUT-RECORDING-STREAM T T T T T T T T T T T)) #<CLIM-CLX::CLX-706-INTERACTOR-PANE CLIM-DEMO::INTERACTOR {1012C9C653}> "-1.01" 28 59.0 0 NIL :LEFT :BASE..
 17: ((LAMBDA (SB-PCL::.ARG0. SB-PCL::.ARG1. SB-PCL::.ARG2. SB-PCL::.ARG3. SB-PCL::.ARG4. SB-PCL::.ARG5. SB-PCL::.ARG6. SB-PCL::.ARG7. SB-PCL::.ARG8. SB-PCL::.ARG9. SB-PCL::.ARG10. SB-PCL::.ARG11.)) #<CLIM..
 18: ((FLET CLIM-INTERNALS::GRAPHICS-OP :IN CLIM:DRAW-TEXT*) #<CLIM-CLX::CLX-706-INTERACTOR-PANE CLIM-DEMO::INTERACTOR {1012C9C653}>)
 19: ((:METHOD CLIM-INTERNALS::DO-GRAPHICS-WITH-OPTIONS-INTERNAL (CLIM:MEDIUM T T)) #<CLIM-CLX::CLX-MEDIUM {1012C9D0A3}> #<CLIM-CLX::CLX-706-INTERACTOR-PANE CLIM-DEMO::INTERACTOR {1012C9C653}> #<CLOSURE (F..
 20: ((SB-PCL::EMF CLIM-INTERNALS::DO-GRAPHICS-WITH-OPTIONS-INTERNAL) #<unused argument> #<unused argument> #<CLIM-CLX::CLX-MEDIUM {1012C9D0A3}> #<CLIM-CLX::CLX-706-INTERACTOR-PANE CLIM-DEMO::INTERACTOR {1..
 21: ((LABELS #:G5 :IN CLIM-INTERNALS::DO-GRAPHICS-WITH-OPTIONS) #<CLIM-CLX::CLX-MEDIUM {1012C9D0A3}>)
 22: ((:METHOD CLIM-INTERNALS::INVOKE-WITH-SHEET-MEDIUM-BOUND (T NULL CLIM:PERMANENT-MEDIUM-SHEET-OUTPUT-MIXIN)) #<CLOSURE (LABELS #:G5 :IN CLIM-INTERNALS::DO-GRAPHICS-WITH-OPTIONS) {67BACEB}> #<unused arg..
 23: ((:METHOD CLIM-INTERNALS::DO-GRAPHICS-WITH-OPTIONS (CLIM:SHEET T)) #<CLIM-CLX::CLX-706-INTERACTOR-PANE CLIM-DEMO::INTERACTOR {1012C9C653}> #<CLOSURE (FLET CLIM-INTERNALS::GRAPHICS-OP :IN CLIM:DRAW-TEX..
 24: (CLIM:DRAW-TEXT* #<CLIM-CLX::CLX-706-INTERACTOR-PANE CLIM-DEMO::INTERACTOR {1012C9C653}> "-1.01" 28 59.0 :TEXT-STYLE #<CLIM:STANDARD-TEXT-STYLE :SANS-SERIF :ROMAN :NORMAL> :INK #.CLIM:+FOREGROUND-INK+..
 25: ((LAMBDA (STRING DREI::CURR-X DREI::NEW-TEXT-STYLE) :IN DREI::FONT-REPLACEMENT-DRAW-TEXT*) "-1.01" 0 #<CLIM:STANDARD-TEXT-STYLE :SANS-SERIF :ROMAN :NORMAL>)
 26: (DREI::ITERATE-FONT-REPLACEMENT #<CLIM-CLX::CLX-706-INTERACTOR-PANE CLIM-DEMO::INTERACTOR {1012C9C653}> "-1.01" 0 5 #<CLIM:STANDARD-TEXT-STYLE :SANS-SERIF :ROMAN :NORMAL> #<CLOSURE (LAMBDA (STRING DRE..
 27: (DREI::FONT-REPLACEMENT-DRAW-TEXT* #<CLIM-CLX::CLX-706-INTERACTOR-PANE CLIM-DEMO::INTERACTOR {1012C9C653}> "-1.01" 28 59.0 :START 0 :END 5 :TEXT-STYLE #<CLIM:STANDARD-TEXT-STYLE :SANS-SERIF :ROMAN :NO..
 28: (DREI::STROKE-DRAWING-FN #<CLIM-CLX::CLX-706-INTERACTOR-PANE CLIM-DEMO::INTERACTOR {1012C9C653}> #<DREI:TEXTUAL-DREI-SYNTAX-VIEW name: *scratch* 1 {1001D90693}> #S(DREI::DISPLAYED-STROKE :START-OFFSET..
 29: ((LAMBDA (STREAM CLIM:VIEW DREI::STROKE DREI::CURSOR-X DREI::CURSOR-Y DREI::DEFAULT-DRAWING-FN DREI::DRAW) :IN "/Users/sly/projects/McCLIM/Libraries/Drei/drei-redisplay.lisp") #<CLIM-CLX::CLX-706-INTE..
 30: (DREI::DRAW-STROKE #<CLIM-CLX::CLX-706-INTERACTOR-PANE CLIM-DEMO::INTERACTOR {1012C9C653}> #<DREI:TEXTUAL-DREI-SYNTAX-VIEW name: *scratch* 1 {1001D90693}> #S(DREI::DISPLAYED-STROKE :START-OFFSET 0 :EN..
 31: (DREI::DRAW-LINE-STROKES #<CLIM-CLX::CLX-706-INTERACTOR-PANE CLIM-DEMO::INTERACTOR {1012C9C653}> #<DREI:TEXTUAL-DREI-SYNTAX-VIEW name: *scratch* 1 {1001D90693}> #S(DREI::PUMP-STATE :LINE-INDEX 1 :OFFS..
 32: ((FLET "CONTINUATION15" :IN DREI:DISPLAY-DREI-VIEW-CONTENTS) #<CLIM-CLX::CLX-706-INTERACTOR-PANE CLIM-DEMO::INTERACTOR {1012C9C653}>)
 33: ((:METHOD CLIM:INVOKE-WITH-OUTPUT-RECORDING-OPTIONS (CLIM:OUTPUT-RECORDING-STREAM T T T)) #<CLIM-CLX::CLX-706-INTERACTOR-PANE CLIM-DEMO::INTERACTOR {1012C9C653}> #<CLOSURE (FLET "CONTINUATION15" :IN D..
 34: ((:METHOD DREI:DISPLAY-DREI-VIEW-CONTENTS (CLIM:BASIC-PANE DREI:DREI-BUFFER-VIEW)) #<CLIM-CLX::CLX-706-INTERACTOR-PANE CLIM-DEMO::INTERACTOR {1012C9C653}> #<DREI:TEXTUAL-DREI-SYNTAX-VIEW name: *scratc..
 35: ((FLET CALL-NEXT-METHOD :IN "/Users/sly/projects/McCLIM/Libraries/Drei/views.lisp"))
 36: ((:METHOD DREI:DISPLAY-DREI-VIEW-CONTENTS :AROUND (T DREI:TEXTUAL-DREI-SYNTAX-VIEW)) #<CLIM-CLX::CLX-706-INTERACTOR-PANE CLIM-DEMO::INTERACTOR {1012C9C653}> #<DREI:TEXTUAL-DREI-SYNTAX-VIEW name: *scra..
 37: ((FLET CALL-NEXT-METHOD :IN "/Users/sly/projects/McCLIM/Libraries/Drei/drei-redisplay.lisp"))
 38: ((:METHOD DREI:DISPLAY-DREI-VIEW-CONTENTS :AROUND (CLIM:EXTENDED-OUTPUT-STREAM DREI:DREI-VIEW)) #<CLIM-CLX::CLX-706-INTERACTOR-PANE CLIM-DEMO::INTERACTOR {1012C9C653}> #<DREI:TEXTUAL-DREI-SYNTAX-VIEW ..
 39: ((:METHOD CLIM:REPLAY-OUTPUT-RECORD (DREI:DREI-AREA CLIM:EXTENDED-OUTPUT-STREAM)) #<DREI:DREI-AREA TEXTUAL-DREI-SYNTAX-VIEW {1001D8ECC3}> #<CLIM-CLX::CLX-706-INTERACTOR-PANE CLIM-DEMO::INTERACTOR {101..
 40: ((SB-PCL::EMF CLIM:REPLAY-OUTPUT-RECORD) #<unused argument> #<unused argument> #<DREI:DREI-AREA TEXTUAL-DREI-SYNTAX-VIEW {1001D8ECC3}> #<CLIM-CLX::CLX-706-INTERACTOR-PANE CLIM-DEMO::INTERACTOR {1012C9..
 41: ((:METHOD CLIM:MAP-OVER-OUTPUT-RECORDS-OVERLAPPING-REGION (T CLIM:STANDARD-SEQUENCE-OUTPUT-RECORD T)) #<STANDARD-GENERIC-FUNCTION CLIM:REPLAY-OUTPUT-RECORD (27)> #<CLIM:STANDARD-SEQUENCE-OUTPUT-RECORD..
 42: ((LAMBDA (SB-PCL::.ARG0. SB-PCL::.ARG1. SB-PCL::.ARG2. SB-INT:&MORE SB-PCL::.MORE-CONTEXT. SB-PCL::.MORE-COUNT.)) #<STANDARD-GENERIC-FUNCTION CLIM:REPLAY-OUTPUT-RECORD (27)> #<CLIM:STANDARD-SEQUENCE-O..
 43: ((FLET "GCONTINUATION6" :IN CLIM:REPLAY-OUTPUT-RECORD) #<unused argument>)
 44: ((FLET CLIM-INTERNALS::GRAPHICS-OP :IN CLIM:INVOKE-WITH-DRAWING-OPTIONS) #<CLIM-CLX::CLX-MEDIUM {1012C9D0A3}>)
 45: ((:METHOD CLIM-INTERNALS::DO-GRAPHICS-WITH-OPTIONS-INTERNAL (CLIM:MEDIUM T T)) #<CLIM-CLX::CLX-MEDIUM {1012C9D0A3}> #<CLIM-CLX::CLX-MEDIUM {1012C9D0A3}> #<CLOSURE (FLET CLIM-INTERNALS::GRAPHICS-OP :IN..
 46: ((SB-PCL::EMF CLIM-INTERNALS::DO-GRAPHICS-WITH-OPTIONS-INTERNAL) #<unused argument> #<unused argument> #<CLIM-CLX::CLX-MEDIUM {1012C9D0A3}> #<CLIM-CLX::CLX-MEDIUM {1012C9D0A3}> #<CLOSURE (FLET CLIM-IN..
 47: ((:METHOD CLIM-INTERNALS::DO-GRAPHICS-WITH-OPTIONS (CLIM:MEDIUM T)) #<CLIM-CLX::CLX-MEDIUM {1012C9D0A3}> #<CLOSURE (FLET CLIM-INTERNALS::GRAPHICS-OP :IN CLIM:INVOKE-WITH-DRAWING-OPTIONS) {67BCE0B}> :C..
 48: ((LABELS #:G5 :IN CLIM:INVOKE-WITH-DRAWING-OPTIONS) #<CLIM-CLX::CLX-MEDIUM {1012C9D0A3}>)
 49: ((:METHOD CLIM-INTERNALS::INVOKE-WITH-SHEET-MEDIUM-BOUND (T NULL CLIM:PERMANENT-MEDIUM-SHEET-OUTPUT-MIXIN)) #<CLOSURE (LABELS #:G5 :IN CLIM:INVOKE-WITH-DRAWING-OPTIONS) {67BCEBB}> #<unused argument> #..
 50: ((:METHOD CLIM:INVOKE-WITH-DRAWING-OPTIONS (CLIM:SHEET T)) #<CLIM-CLX::CLX-706-INTERACTOR-PANE CLIM-DEMO::INTERACTOR {1012C9C653}> #<CLOSURE (FLET "GCONTINUATION6" :IN CLIM:REPLAY-OUTPUT-RECORD) {67BD..
 51: ((SB-PCL::EMF CLIM:INVOKE-WITH-DRAWING-OPTIONS) #<unused argument> #<unused argument> #<CLIM-CLX::CLX-706-INTERACTOR-PANE CLIM-DEMO::INTERACTOR {1012C9C653}> #<CLOSURE (FLET "GCONTINUATION6" :IN CLIM:..
 52: ((:METHOD CLIM:REPLAY-OUTPUT-RECORD (CLIM-INTERNALS::COMPOUND-OUTPUT-RECORD T)) #<CLIM:STANDARD-SEQUENCE-OUTPUT-RECORD X 28:183.26563 Y 47.0:62.0 {1001D8E1D3}> #<CLIM-CLX::CLX-706-INTERACTOR-PANE CLIM..
 53: ((:METHOD CLIM:MAP-OVER-OUTPUT-RECORDS-OVERLAPPING-REGION (T CLIM:STANDARD-SEQUENCE-OUTPUT-RECORD T)) #<STANDARD-GENERIC-FUNCTION CLIM:REPLAY-OUTPUT-RECORD (27)> #<CLIM-INTERNALS::HIGHLIGHTING-BORDERE..
 54: ((LAMBDA (SB-PCL::.ARG0. SB-PCL::.ARG1. SB-PCL::.ARG2. SB-INT:&MORE SB-PCL::.MORE-CONTEXT. SB-PCL::.MORE-COUNT.)) #<STANDARD-GENERIC-FUNCTION CLIM:REPLAY-OUTPUT-RECORD (27)> #<CLIM-INTERNALS::HIGHLIGH..
 55: ((FLET "GCONTINUATION6" :IN CLIM:REPLAY-OUTPUT-RECORD) #<unused argument>)
 56: ((FLET CLIM-INTERNALS::GRAPHICS-OP :IN CLIM:INVOKE-WITH-DRAWING-OPTIONS) #<CLIM-CLX::CLX-MEDIUM {1012C9D0A3}>)
 57: ((:METHOD CLIM-INTERNALS::DO-GRAPHICS-WITH-OPTIONS-INTERNAL (CLIM:MEDIUM T T)) #<CLIM-CLX::CLX-MEDIUM {1012C9D0A3}> #<CLIM-CLX::CLX-MEDIUM {1012C9D0A3}> #<CLOSURE (FLET CLIM-INTERNALS::GRAPHICS-OP :IN..
 58: ((SB-PCL::EMF CLIM-INTERNALS::DO-GRAPHICS-WITH-OPTIONS-INTERNAL) #<unused argument> #<unused argument> #<CLIM-CLX::CLX-MEDIUM {1012C9D0A3}> #<CLIM-CLX::CLX-MEDIUM {1012C9D0A3}> #<CLOSURE (FLET CLIM-IN..
 59: ((:METHOD CLIM-INTERNALS::DO-GRAPHICS-WITH-OPTIONS (CLIM:MEDIUM T)) #<CLIM-CLX::CLX-MEDIUM {1012C9D0A3}> #<CLOSURE (FLET CLIM-INTERNALS::GRAPHICS-OP :IN CLIM:INVOKE-WITH-DRAWING-OPTIONS) {67BD79B}> :C..
 --more--
	The value
	10487096
	is not of type
	(INTEGER 0 0)
	when binding #:G2
	[Condition of type TYPE-ERROR]

	Restarts:
	0: [TRY-AGAIN] Try executing the command COM-ACCEPTING-INTERVAL again
	1: [ABORT] Return to application command loop
	2: [ABORT] Return to application command loop
	3: [RETRY] Retry SLIME REPL evaluation request.
	4: [*PROCESS-INPUT] Continue reading input.
	5: [ABORT] Return to SLIME's top level.
	--more--

	Backtrace:
	0: (XLIB:GCONTEXT-CLIP-MASK #<XLIB:GCONTEXT :0 10487067>)
	1: ((FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN CLIM-CLX::FONT-DRAW-GLYPHS))
	2: ((FLET "WITHOUT-INTERRUPTS-BODY-29" :IN SB-THREAD::CALL-WITH-RECURSIVE-LOCK))
	3: (SB-THREAD::CALL-WITH-RECURSIVE-LOCK #<CLOSURE (FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN CLIM-CLX::FONT-DRAW-GLYPHS) {67B914B}> #<SB-THREAD:MUTEX "Anonymous recursive lock" owner: #<SB-THREAD:THR..
	4: ((:METHOD CLIM-CLX::FONT-DRAW-GLYPHS (CLIM-FREETYPE::FREETYPE-FONT T T T T T)) #<CLIM-FREETYPE::FREETYPE-FONT FACE #<CLIM-FREETYPE::FREETYPE-FONT-FACE DejaVu Sans, Book> SIZE 12> #<XLIB:WINDOW :0 A004..
	5: ((SB-PCL::EMF CLIM-CLX::FONT-DRAW-GLYPHS) #<unused argument> #<unused argument> #<CLIM-FREETYPE::FREETYPE-FONT FACE #<CLIM-FREETYPE::FREETYPE-FONT-FACE DejaVu Sans, Book> SIZE 12> #<XLIB:WINDOW :0 A00..
	6: ((LAMBDA (SB-PCL::.ARG0. SB-PCL::.ARG1. SB-PCL::.ARG2. SB-PCL::.ARG3. SB-PCL::.ARG4. SB-PCL::.ARG5. SB-INT:&MORE SB-PCL::.MORE-CONTEXT. SB-PCL::.MORE-COUNT.)) #<CLIM-FREETYPE::FREETYPE-FONT FACE #<CLI..
	7: ((FLET SB-THREAD::WITH-MUTEX-THUNK :IN CLIM:MEDIUM-DRAW-TEXT*))
	8: ((FLET "WITHOUT-INTERRUPTS-BODY-1" :IN SB-THREAD::CALL-WITH-MUTEX))
	9: (SB-THREAD::CALL-WITH-MUTEX #<CLOSURE (FLET SB-THREAD::WITH-MUTEX-THUNK :IN CLIM:MEDIUM-DRAW-TEXT*) {67B9A5B}> #<SB-THREAD:MUTEX "draw-font" owner: #<SB-THREAD:THREAD "main thread" RUNNING {10005405B3..
	10: ((:METHOD CLIM:MEDIUM-DRAW-TEXT* (CLIM-CLX::CLX-MEDIUM T T T T T T T T T T T)) #<CLIM-CLX::CLX-MEDIUM {1012C9D0A3}> "-1.01" 28 59.0 0 NIL :LEFT :BASELINE #<unused argument> #<unused argument> #<unused..
	11: ((LAMBDA (SB-PCL::.ARG0. SB-PCL::.ARG1. SB-PCL::.ARG2. SB-PCL::.ARG3. SB-PCL::.ARG4. SB-PCL::.ARG5. SB-PCL::.ARG6. SB-PCL::.ARG7. SB-PCL::.ARG8. SB-PCL::.ARG9. SB-PCL::.ARG10. SB-PCL::.ARG11.)) #<CLIM..
	12: ((LABELS #:G13 :IN CLIM:MEDIUM-DRAW-TEXT*) #<CLIM-CLX::CLX-MEDIUM {1012C9D0A3}>)
	13: ((:METHOD CLIM-INTERNALS::INVOKE-WITH-SHEET-MEDIUM-BOUND (T NULL CLIM:PERMANENT-MEDIUM-SHEET-OUTPUT-MIXIN)) #<CLOSURE (LABELS #:G13 :IN CLIM:MEDIUM-DRAW-TEXT*) {67B9E1B}> #<unused argument> #<CLIM-CLX..
	14: ((:METHOD CLIM:MEDIUM-DRAW-TEXT* (CLIM:SHEET T T T T T T T T T T T)) #<CLIM-CLX::CLX-706-INTERACTOR-PANE CLIM-DEMO::INTERACTOR {1012C9C653}> "-1.01" 28 59.0 0 NIL :LEFT :BASELINE 29 59.0 NIL #<CLIM-IN..
	15: ((FLET CALL-NEXT-METHOD :IN "/Users/sly/projects/McCLIM/Core/clim-basic/recording.lisp"))
	16: ((:METHOD CLIM:MEDIUM-DRAW-TEXT* :AROUND (CLIM:OUTPUT-RECORDING-STREAM T T T T T T T T T T T)) #<CLIM-CLX::CLX-706-INTERACTOR-PANE CLIM-DEMO::INTERACTOR {1012C9C653}> "-1.01" 28 59.0 0 NIL :LEFT :BASE..
	17: ((LAMBDA (SB-PCL::.ARG0. SB-PCL::.ARG1. SB-PCL::.ARG2. SB-PCL::.ARG3. SB-PCL::.ARG4. SB-PCL::.ARG5. SB-PCL::.ARG6. SB-PCL::.ARG7. SB-PCL::.ARG8. SB-PCL::.ARG9. SB-PCL::.ARG10. SB-PCL::.ARG11.)) #<CLIM..
	18: ((FLET CLIM-INTERNALS::GRAPHICS-OP :IN CLIM:DRAW-TEXT*) #<CLIM-CLX::CLX-706-INTERACTOR-PANE CLIM-DEMO::INTERACTOR {1012C9C653}>)
	19: ((:METHOD CLIM-INTERNALS::DO-GRAPHICS-WITH-OPTIONS-INTERNAL (CLIM:MEDIUM T T)) #<CLIM-CLX::CLX-MEDIUM {1012C9D0A3}> #<CLIM-CLX::CLX-706-INTERACTOR-PANE CLIM-DEMO::INTERACTOR {1012C9C653}> #<CLOSURE (F..
	20: ((SB-PCL::EMF CLIM-INTERNALS::DO-GRAPHICS-WITH-OPTIONS-INTERNAL) #<unused argument> #<unused argument> #<CLIM-CLX::CLX-MEDIUM {1012C9D0A3}> #<CLIM-CLX::CLX-706-INTERACTOR-PANE CLIM-DEMO::INTERACTOR {1..
	21: ((LABELS #:G5 :IN CLIM-INTERNALS::DO-GRAPHICS-WITH-OPTIONS) #<CLIM-CLX::CLX-MEDIUM {1012C9D0A3}>)
	22: ((:METHOD CLIM-INTERNALS::INVOKE-WITH-SHEET-MEDIUM-BOUND (T NULL CLIM:PERMANENT-MEDIUM-SHEET-OUTPUT-MIXIN)) #<CLOSURE (LABELS #:G5 :IN CLIM-INTERNALS::DO-GRAPHICS-WITH-OPTIONS) {67BACEB}> #<unused arg..
	23: ((:METHOD CLIM-INTERNALS::DO-GRAPHICS-WITH-OPTIONS (CLIM:SHEET T)) #<CLIM-CLX::CLX-706-INTERACTOR-PANE CLIM-DEMO::INTERACTOR {1012C9C653}> #<CLOSURE (FLET CLIM-INTERNALS::GRAPHICS-OP :IN CLIM:DRAW-TEX..
	24: (CLIM:DRAW-TEXT* #<CLIM-CLX::CLX-706-INTERACTOR-PANE CLIM-DEMO::INTERACTOR {1012C9C653}> "-1.01" 28 59.0 :TEXT-STYLE #<CLIM:STANDARD-TEXT-STYLE :SANS-SERIF :ROMAN :NORMAL> :INK #.CLIM:+FOREGROUND-INK+..
	25: ((LAMBDA (STRING DREI::CURR-X DREI::NEW-TEXT-STYLE) :IN DREI::FONT-REPLACEMENT-DRAW-TEXT*) "-1.01" 0 #<CLIM:STANDARD-TEXT-STYLE :SANS-SERIF :ROMAN :NORMAL>)
	26: (DREI::ITERATE-FONT-REPLACEMENT #<CLIM-CLX::CLX-706-INTERACTOR-PANE CLIM-DEMO::INTERACTOR {1012C9C653}> "-1.01" 0 5 #<CLIM:STANDARD-TEXT-STYLE :SANS-SERIF :ROMAN :NORMAL> #<CLOSURE (LAMBDA (STRING DRE..
	27: (DREI::FONT-REPLACEMENT-DRAW-TEXT* #<CLIM-CLX::CLX-706-INTERACTOR-PANE CLIM-DEMO::INTERACTOR {1012C9C653}> "-1.01" 28 59.0 :START 0 :END 5 :TEXT-STYLE #<CLIM:STANDARD-TEXT-STYLE :SANS-SERIF :ROMAN :NO..
	28: (DREI::STROKE-DRAWING-FN #<CLIM-CLX::CLX-706-INTERACTOR-PANE CLIM-DEMO::INTERACTOR {1012C9C653}> #<DREI:TEXTUAL-DREI-SYNTAX-VIEW name: scratch 1 {1001D90693}> #S(DREI::DISPLAYED-STROKE :START-OFFSET..
	29: ((LAMBDA (STREAM CLIM:VIEW DREI::STROKE DREI::CURSOR-X DREI::CURSOR-Y DREI::DEFAULT-DRAWING-FN DREI::DRAW) :IN "/Users/sly/projects/McCLIM/Libraries/Drei/drei-redisplay.lisp") #<CLIM-CLX::CLX-706-INTE..
	30: (DREI::DRAW-STROKE #<CLIM-CLX::CLX-706-INTERACTOR-PANE CLIM-DEMO::INTERACTOR {1012C9C653}> #<DREI:TEXTUAL-DREI-SYNTAX-VIEW name: scratch 1 {1001D90693}> #S(DREI::DISPLAYED-STROKE :START-OFFSET 0 :EN..
	31: (DREI::DRAW-LINE-STROKES #<CLIM-CLX::CLX-706-INTERACTOR-PANE CLIM-DEMO::INTERACTOR {1012C9C653}> #<DREI:TEXTUAL-DREI-SYNTAX-VIEW name: scratch 1 {1001D90693}> #S(DREI::PUMP-STATE :LINE-INDEX 1 :OFFS..
	32: ((FLET "CONTINUATION15" :IN DREI:DISPLAY-DREI-VIEW-CONTENTS) #<CLIM-CLX::CLX-706-INTERACTOR-PANE CLIM-DEMO::INTERACTOR {1012C9C653}>)
	33: ((:METHOD CLIM:INVOKE-WITH-OUTPUT-RECORDING-OPTIONS (CLIM:OUTPUT-RECORDING-STREAM T T T)) #<CLIM-CLX::CLX-706-INTERACTOR-PANE CLIM-DEMO::INTERACTOR {1012C9C653}> #<CLOSURE (FLET "CONTINUATION15" :IN D..
	34: ((:METHOD DREI:DISPLAY-DREI-VIEW-CONTENTS (CLIM:BASIC-PANE DREI:DREI-BUFFER-VIEW)) #<CLIM-CLX::CLX-706-INTERACTOR-PANE CLIM-DEMO::INTERACTOR {1012C9C653}> #<DREI:TEXTUAL-DREI-SYNTAX-VIEW name: *scratc..
	35: ((FLET CALL-NEXT-METHOD :IN "/Users/sly/projects/McCLIM/Libraries/Drei/views.lisp"))
	36: ((:METHOD DREI:DISPLAY-DREI-VIEW-CONTENTS :AROUND (T DREI:TEXTUAL-DREI-SYNTAX-VIEW)) #<CLIM-CLX::CLX-706-INTERACTOR-PANE CLIM-DEMO::INTERACTOR {1012C9C653}> #<DREI:TEXTUAL-DREI-SYNTAX-VIEW name: *scra..
	37: ((FLET CALL-NEXT-METHOD :IN "/Users/sly/projects/McCLIM/Libraries/Drei/drei-redisplay.lisp"))
	38: ((:METHOD DREI:DISPLAY-DREI-VIEW-CONTENTS :AROUND (CLIM:EXTENDED-OUTPUT-STREAM DREI:DREI-VIEW)) #<CLIM-CLX::CLX-706-INTERACTOR-PANE CLIM-DEMO::INTERACTOR {1012C9C653}> #<DREI:TEXTUAL-DREI-SYNTAX-VIEW ..
	39: ((:METHOD CLIM:REPLAY-OUTPUT-RECORD (DREI:DREI-AREA CLIM:EXTENDED-OUTPUT-STREAM)) #<DREI:DREI-AREA TEXTUAL-DREI-SYNTAX-VIEW {1001D8ECC3}> #<CLIM-CLX::CLX-706-INTERACTOR-PANE CLIM-DEMO::INTERACTOR {101..
	40: ((SB-PCL::EMF CLIM:REPLAY-OUTPUT-RECORD) #<unused argument> #<unused argument> #<DREI:DREI-AREA TEXTUAL-DREI-SYNTAX-VIEW {1001D8ECC3}> #<CLIM-CLX::CLX-706-INTERACTOR-PANE CLIM-DEMO::INTERACTOR {1012C9..
	41: ((:METHOD CLIM:MAP-OVER-OUTPUT-RECORDS-OVERLAPPING-REGION (T CLIM:STANDARD-SEQUENCE-OUTPUT-RECORD T)) #<STANDARD-GENERIC-FUNCTION CLIM:REPLAY-OUTPUT-RECORD (27)> #<CLIM:STANDARD-SEQUENCE-OUTPUT-RECORD..
	42: ((LAMBDA (SB-PCL::.ARG0. SB-PCL::.ARG1. SB-PCL::.ARG2. SB-INT:&MORE SB-PCL::.MORE-CONTEXT. SB-PCL::.MORE-COUNT.)) #<STANDARD-GENERIC-FUNCTION CLIM:REPLAY-OUTPUT-RECORD (27)> #<CLIM:STANDARD-SEQUENCE-O..
	43: ((FLET "GCONTINUATION6" :IN CLIM:REPLAY-OUTPUT-RECORD) #<unused argument>)
	44: ((FLET CLIM-INTERNALS::GRAPHICS-OP :IN CLIM:INVOKE-WITH-DRAWING-OPTIONS) #<CLIM-CLX::CLX-MEDIUM {1012C9D0A3}>)
	45: ((:METHOD CLIM-INTERNALS::DO-GRAPHICS-WITH-OPTIONS-INTERNAL (CLIM:MEDIUM T T)) #<CLIM-CLX::CLX-MEDIUM {1012C9D0A3}> #<CLIM-CLX::CLX-MEDIUM {1012C9D0A3}> #<CLOSURE (FLET CLIM-INTERNALS::GRAPHICS-OP :IN..
	46: ((SB-PCL::EMF CLIM-INTERNALS::DO-GRAPHICS-WITH-OPTIONS-INTERNAL) #<unused argument> #<unused argument> #<CLIM-CLX::CLX-MEDIUM {1012C9D0A3}> #<CLIM-CLX::CLX-MEDIUM {1012C9D0A3}> #<CLOSURE (FLET CLIM-IN..
	47: ((:METHOD CLIM-INTERNALS::DO-GRAPHICS-WITH-OPTIONS (CLIM:MEDIUM T)) #<CLIM-CLX::CLX-MEDIUM {1012C9D0A3}> #<CLOSURE (FLET CLIM-INTERNALS::GRAPHICS-OP :IN CLIM:INVOKE-WITH-DRAWING-OPTIONS) {67BCE0B}> :C..
	48: ((LABELS #:G5 :IN CLIM:INVOKE-WITH-DRAWING-OPTIONS) #<CLIM-CLX::CLX-MEDIUM {1012C9D0A3}>)
	49: ((:METHOD CLIM-INTERNALS::INVOKE-WITH-SHEET-MEDIUM-BOUND (T NULL CLIM:PERMANENT-MEDIUM-SHEET-OUTPUT-MIXIN)) #<CLOSURE (LABELS #:G5 :IN CLIM:INVOKE-WITH-DRAWING-OPTIONS) {67BCEBB}> #<unused argument> #..
	50: ((:METHOD CLIM:INVOKE-WITH-DRAWING-OPTIONS (CLIM:SHEET T)) #<CLIM-CLX::CLX-706-INTERACTOR-PANE CLIM-DEMO::INTERACTOR {1012C9C653}> #<CLOSURE (FLET "GCONTINUATION6" :IN CLIM:REPLAY-OUTPUT-RECORD) {67BD..
	51: ((SB-PCL::EMF CLIM:INVOKE-WITH-DRAWING-OPTIONS) #<unused argument> #<unused argument> #<CLIM-CLX::CLX-706-INTERACTOR-PANE CLIM-DEMO::INTERACTOR {1012C9C653}> #<CLOSURE (FLET "GCONTINUATION6" :IN CLIM:..
	52: ((:METHOD CLIM:REPLAY-OUTPUT-RECORD (CLIM-INTERNALS::COMPOUND-OUTPUT-RECORD T)) #<CLIM:STANDARD-SEQUENCE-OUTPUT-RECORD X 28:183.26563 Y 47.0:62.0 {1001D8E1D3}> #<CLIM-CLX::CLX-706-INTERACTOR-PANE CLIM..
	53: ((:METHOD CLIM:MAP-OVER-OUTPUT-RECORDS-OVERLAPPING-REGION (T CLIM:STANDARD-SEQUENCE-OUTPUT-RECORD T)) #<STANDARD-GENERIC-FUNCTION CLIM:REPLAY-OUTPUT-RECORD (27)> #<CLIM-INTERNALS::HIGHLIGHTING-BORDERE..
	54: ((LAMBDA (SB-PCL::.ARG0. SB-PCL::.ARG1. SB-PCL::.ARG2. SB-INT:&MORE SB-PCL::.MORE-CONTEXT. SB-PCL::.MORE-COUNT.)) #<STANDARD-GENERIC-FUNCTION CLIM:REPLAY-OUTPUT-RECORD (27)> #<CLIM-INTERNALS::HIGHLIGH..
	55: ((FLET "GCONTINUATION6" :IN CLIM:REPLAY-OUTPUT-RECORD) #<unused argument>)
	56: ((FLET CLIM-INTERNALS::GRAPHICS-OP :IN CLIM:INVOKE-WITH-DRAWING-OPTIONS) #<CLIM-CLX::CLX-MEDIUM {1012C9D0A3}>)
	57: ((:METHOD CLIM-INTERNALS::DO-GRAPHICS-WITH-OPTIONS-INTERNAL (CLIM:MEDIUM T T)) #<CLIM-CLX::CLX-MEDIUM {1012C9D0A3}> #<CLIM-CLX::CLX-MEDIUM {1012C9D0A3}> #<CLOSURE (FLET CLIM-INTERNALS::GRAPHICS-OP :IN..
	58: ((SB-PCL::EMF CLIM-INTERNALS::DO-GRAPHICS-WITH-OPTIONS-INTERNAL) #<unused argument> #<unused argument> #<CLIM-CLX::CLX-MEDIUM {1012C9D0A3}> #<CLIM-CLX::CLX-MEDIUM {1012C9D0A3}> #<CLOSURE (FLET CLIM-IN..
	59: ((:METHOD CLIM-INTERNALS::DO-GRAPHICS-WITH-OPTIONS (CLIM:MEDIUM T)) #<CLIM-CLX::CLX-MEDIUM {1012C9D0A3}> #<CLOSURE (FLET CLIM-INTERNALS::GRAPHICS-OP :IN CLIM:INVOKE-WITH-DRAWING-OPTIONS) {67BD79B}> :C..
	--more--