[mcclim-devel] beirc bug report

16 Jun 2010

      I'm not sure what the best forum for reporting bugs in beirc and or
mcclim these days (any interest in launchpad projects for these and
similar projects?), but I came across this bug in beirc today, and I
thought I'd post it here to see if anyone has any ideas.

This is with SBCL 1.0.39.15 on linux/x86-64/sb-threads.

any suggestions would be appreciated.

thanks,

Cyrus

unhandled TYPE-ERROR in thread #<SB-THREAD:THREAD "initial thread" RUNNING
                                 {1002AC2D11}>:
  The value 953 is not of type (UNSIGNED-BYTE 8).

0: (SB-DEBUG::MAP-BACKTRACE #<CLOSURE (LAMBDA #) {1003E9BD59}>)[:EXTERNAL]
1: (SB-DEBUG:BACKTRACE
    128
    #<SYNONYM-STREAM :SYMBOL SB-SYS:*STDERR* {1000159B51}>)
2: (SB-DEBUG::DEBUGGER-DISABLED-HOOK
    #<TYPE-ERROR {1003E99321}>
    #<unavailable argument>)
3: (SB-DEBUG::RUN-HOOK SB-EXT:*INVOKE-DEBUGGER-HOOK* #<TYPE-ERROR
{1003E99321}>)
4: (INVOKE-DEBUGGER #<TYPE-ERROR {1003E99321}>)
5: (ERROR TYPE-ERROR)[:EXTERNAL]
6: (SB-KERNEL::OBJECT-NOT-TYPE-ERROR-HANDLER
    #<unavailable argument>
    #.(SB-SYS:INT-SAP #X7FFFF4EC1980)
    #<SB-ALIEN-INTERNALS:ALIEN-VALUE :SAP #X7FFFF4EC1500 :TYPE (*

(SB-ALIEN:STRUCT SB-VM::OS-CONTEXT-T-STRUCT))>
    (405 21))
7: (SB-KERNEL:INTERNAL-ERROR
    #.(SB-SYS:INT-SAP #X7FFFF4EC1500)
    #<unavailable argument>)
8: ("foreign function: #x422C00")
9: ("foreign function: #x40D15C")
10: ("foreign function: #x4133A5")
11: ("foreign function: #x4140BA")
12: (SB-IMPL::OPTIMIZED-DATA-VECTOR-SET
     #<unavailable argument>
     #<unavailable argument>
     #<unavailable argument>)
13: (CLIM-CLX::TRANSLATE
     "ι"
     0
     1
     #<XLIB:FONT
       -adobe-helvetica-medium-r-normal--14-100-100-100-p-76-iso10646-1
:0 50331673>
     #(56 0 4 0 85 0 0 3 4 0 0 0 190 190 190 0 59 0 5 0 85 0 0 3 0 0 0 0
0 0 45
       45 5 3 191 1 74 0 5 0 83 0 0 3 85 0 0 3 33 4 251 46 1 0 91 0 74 0
6 0 83
...
       0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0)
     138)
14: ((FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK))
15: ((FLET #:WITHOUT-INTERRUPTS-BODY-[CALL-WITH-RECURSIVE-LOCK]324))
16: (SB-THREAD::CALL-WITH-RECURSIVE-LOCK
     #<CLOSURE (FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK) {7FFFF4EC1CA9}>
     #S(SB-THREAD:MUTEX
        :NAME "CLX Buffer Lock"
        :%OWNER #<SB-THREAD:THREAD "initial thread" RUNNING {1002AC2D11}>
        :STATE 1))
17: (XLIB::DRAW-GLYPHS8
     #<XLIB:WINDOW :0 3000053>
     #<XLIB:GCONTEXT :0 50331733>
     93
     12027
     "ι"
     0
     1
     #<FUNCTION CLIM-CLX::TRANSLATE>
     #<unavailable argument>)
18: ((SB-PCL::FAST-METHOD CLIM:MEDIUM-DRAW-TEXT*
      (CLIM-CLX::CLX-MEDIUM T T T T T T T T T T))
     #<unavailable argument>
     #<unavailable argument>
     #<CLIM-CLX::CLX-MEDIUM {10061DE701}>
     "ι"
     93
     12027
     0
     1
     :LEFT
     :BASELINE
     #<unavailable argument>
     #<unavailable argument>
     #<unavailable argument>)
19: ((SB-PCL::FAST-METHOD CLIM-INTERNALS::DO-GRAPHICS-WITH-OPTIONS-INTERNAL
      (CLIM:MEDIUM T T))
     #<unavailable argument>
     #<unavailable argument>
     #<CLIM-CLX::CLX-MEDIUM {10061DE701}>
     #<CLIM-CLX::CLX-MEDIUM {10061DE701}>
     #<CLOSURE (FLET CLIM-INTERNALS::GRAPHICS-OP)
{7FFFF4EC20D9}>)[:EXTERNAL]
20: (CLIM:DRAW-TEXT* #<CLIM-CLX::CLX-MEDIUM {10061DE701}> "ι" 93
12027)[:EXTERNAL]
21: ((SB-PCL::FAST-METHOD CLIM-INTERNALS::STREAM-WRITE-OUTPUT :AROUND
      (CLIM:STANDARD-OUTPUT-RECORDING-STREAM T T))
     #(45 NIL)
     #S(SB-PCL::FAST-METHOD-CALL
        :FUNCTION #<FUNCTION #>
        :PV NIL
        :NEXT-METHOD-CALL NIL
        :ARG-INFO (3 . T))
     #<CLIM:APPLICATION-PANE "(Unnamed Pane)" {1003970631}>
     "ι"
     NIL)[:EXTERNAL]
22: ((SB-PCL::FAST-METHOD CLIM-INTERNALS::DO-GRAPHICS-WITH-OPTIONS-INTERNAL
      (CLIM:MEDIUM T T))
     #<unavailable argument>
     #<unavailable argument>
     #<CLIM-CLX::CLX-MEDIUM {10061DE701}>
     #<CLIM-CLX::CLX-MEDIUM {10061DE701}>
     #<CLOSURE (FLET CLIM-INTERNALS::GRAPHICS-OP)
{7FFFF4EC2499}>)[:EXTERNAL]
23: ((LABELS #:G294) #<CLIM-CLX::CLX-MEDIUM {10061DE701}>)
24: ((SB-PCL::FAST-METHOD CLIM:INVOKE-WITH-DRAWING-OPTIONS (CLIM:SHEET T))
     #<unavailable argument>
     #<unavailable argument>
     #<CLIM:APPLICATION-PANE "(Unnamed Pane)" {1003970631}>
     #<CLOSURE (FLET #:GCONTINUATION6319) {7FFFF4EC2589}>)[:EXTERNAL]
25: ((LABELS #:G6300) #<CLIM-CLX::CLX-MEDIUM {10061DE701}>)
26: ((SB-PCL::FAST-METHOD CLIM:REPLAY-OUTPUT-RECORD
      (CLIM-INTERNALS::STANDARD-TEXT-DISPLAYED-OUTPUT-RECORD T))
     #(8 NIL 10 NIL 14 NIL 7 NIL 17 NIL)
     #<unused argument>
     #<CLIM-INTERNALS::STANDARD-TEXT-DISPLAYED-OUTPUT-RECORD 93,12014 ("ι")
       {1003B5C791}>
     #<CLIM:APPLICATION-PANE "(Unnamed Pane)" {1003970631}>
     #<unused argument>
     #<unused argument>
     #<unused argument>)
27: ((SB-PCL::FAST-METHOD CLIM-INTERNALS::DO-GRAPHICS-WITH-OPTIONS-INTERNAL
      (CLIM:MEDIUM T T))
     #<unavailable argument>
     #<unavailable argument>
     #<CLIM-CLX::CLX-MEDIUM {10061DE701}>
     #<CLIM-CLX::CLX-MEDIUM {10061DE701}>
     #<CLOSURE (FLET CLIM-INTERNALS::GRAPHICS-OP)
{7FFFF4EC2869}>)[:EXTERNAL]
28: ((LABELS #:G294) #<CLIM-CLX::CLX-MEDIUM {10061DE701}>)
29: ((SB-PCL::FAST-METHOD CLIM:INVOKE-WITH-DRAWING-OPTIONS (CLIM:SHEET T))
     #<unavailable argument>
     #<unavailable argument>
     #<CLIM:APPLICATION-PANE "(Unnamed Pane)" {1003970631}>
     #<CLOSURE (FLET #:GCONTINUATION1711) {7FFFF4EC2939}>)[:EXTERNAL]
30: ((SB-PCL::FAST-METHOD CLIM:REPLAY-OUTPUT-RECORD :AROUND
      (CLIM-INTERNALS::GS-INK-MIXIN T))
     #<unavailable argument>
     #S(SB-PCL::FAST-METHOD-CALL
        :FUNCTION #<FUNCTION #>
        :PV #(8 NIL 10 NIL 14 NIL 7 NIL 17 NIL)
        :NEXT-METHOD-CALL NIL
        :ARG-INFO (2 . T))
     #<CLIM-INTERNALS::STANDARD-TEXT-DISPLAYED-OUTPUT-RECORD 93,12014 ("ι")
       {1003B5C791}>
     #<CLIM:APPLICATION-PANE "(Unnamed Pane)" {1003970631}>)[:EXTERNAL]
31: ((LABELS #:G441) #<CLIM-CLX::CLX-MEDIUM {10061DE701}>)
32: (CLIM:REPLAY
     #<CLIM-INTERNALS::STANDARD-TEXT-DISPLAYED-OUTPUT-RECORD 93,12014 ("ι")
       {1003B5C791}>
     #<CLIM:APPLICATION-PANE "(Unnamed Pane)" {1003970631}>
     #<CLIM:STANDARD-RECTANGLE X 0:773 Y 11565:12012 {1003E965A1}>)
33: ((SB-PCL::FAST-METHOD CLIM:INCREMENTAL-REDISPLAY
      (CLIM-INTERNALS::UPDATING-OUTPUT-STREAM-MIXIN T T T T T T))
     #<unavailable argument>
     #<unavailable argument>
     #<CLIM:APPLICATION-PANE "(Unnamed Pane)" {1003970631}>
     #<unavailable argument>
     NIL
     NIL
     ((#<CLIM-INTERNALS::STANDARD-TEXT-DISPLAYED-OUTPUT-RECORD
         1057,12014 ("[" "14:" "11]") {1003B5D651}>
       #<CLIM-INTERNALS::STANDARD-TEXT-DISPLAYED-OUTPUT-RECORD
         1057,12014 ("[" "14:" "11]") {1003B5D651}>)
      (#<CLIM-INTERNALS::STANDARD-TEXT-DISPLAYED-OUTPUT-RECORD 93,12014
("ι")
         {1003B5C791}>
       #<CLIM-INTERNALS::STANDARD-TEXT-DISPLAYED-OUTPUT-RECORD 93,12014
("ι")
         {1003B5C791}>)
      (#<CLIM-INTERNALS::STANDARD-TEXT-DISPLAYED-OUTPUT-RECORD 81,12014
(">")
         {10044542E1}>
       #<CLIM-INTERNALS::STANDARD-TEXT-DISPLAYED-OUTPUT-RECORD 81,12014
(">")
         {10044542E1}>)
      (#<CLIM-INTERNALS::STANDARD-TEXT-DISPLAYED-OUTPUT-RECORD
         44,12014 ("cbeok") {1004473F11}>
       #<CLIM-INTERNALS::STANDARD-TEXT-DISPLAYED-OUTPUT-RECORD
         44,12014 ("cbeok") {1004473F11}>)
      (#<CLIM-INTERNALS::STANDARD-TEXT-DISPLAYED-OUTPUT-RECORD 36,12014
("<")
         {10044542A1}>
       #<CLIM-INTERNALS::STANDARD-TEXT-DISPLAYED-OUTPUT-RECORD 36,12014
("<")
         {10044542A1}>))
     NIL
     NIL)
34: ((SB-PCL::FAST-METHOD CLIM:REDISPLAY-OUTPUT-RECORD
      (CLIM:UPDATING-OUTPUT-RECORD
       CLIM-INTERNALS::UPDATING-OUTPUT-STREAM-MIXIN))
     #<unused argument>
     #<unused argument>
     #<CLIM:STANDARD-UPDATING-OUTPUT-RECORD
       X 0:1100 Y 0:12030  CLIM-INTERNALS::TOP-LEVEL {10061DE731}>
     #<CLIM:APPLICATION-PANE "(Unnamed Pane)" {1003970631}>
     T)
35: ((LAMBDA
         (SB-PCL::.PV. SB-PCL::.NEXT-METHOD-CALL. SB-PCL::.ARG0.
SB-PCL::.ARG1.
          SB-INT:&MORE SB-PCL::.DFUN-MORE-CONTEXT.
SB-PCL::.DFUN-MORE-COUNT.))
     #<unused argument>
     #<unused argument>
     #<BEIRC:BEIRC {100304D5C1}>
     #<CLIM:APPLICATION-PANE "(Unnamed Pane)" {1003970631}>
     17592162813397
     2)
36: ((SB-PCL::FAST-METHOD CLIM:REDISPLAY-FRAME-PANE :AROUND
      (CLIM:APPLICATION-FRAME T))
     #<unavailable argument>
     #S(SB-PCL::FAST-METHOD-CALL
        :FUNCTION #<CLOSURE # {1004351429}>
        :PV NIL
        :NEXT-METHOD-CALL NIL
        :ARG-INFO (2 . T))
     #<BEIRC:BEIRC {100304D5C1}>
     #<CLIM:APPLICATION-PANE "(Unnamed Pane)" {1003970631}>)[:EXTERNAL]
37: ((SB-PCL::FAST-METHOD CLIM:MAP-OVER-SHEETS (T CLIM:BASIC-SHEET))
     #<unavailable argument>
     #<unavailable argument>
     #<CLOSURE (LAMBDA #) {1003903B49}>
     #<CLIM:APPLICATION-PANE "(Unnamed Pane)" {1003970631}>)
38: ((SB-PCL::FAST-METHOD CLIM:MAP-OVER-SHEETS (T CLIM:BASIC-SHEET))
     #<unavailable argument>
     #<unavailable argument>
     #<CLOSURE (LAMBDA #) {1003903B49}>
     #<CLIM-EXTENSIONS:VIEWPORT-PANE "(Unnamed Pane)" {100398AB21}>)
39: ((SB-PCL::FAST-METHOD CLIM:MAP-OVER-SHEETS (T CLIM:BASIC-SHEET))
     #<unavailable argument>
     #<unavailable argument>
     #<CLOSURE (LAMBDA #) {1003903B49}>
     #<CLIM:SCROLLER-PANE "(Unnamed Pane)" {1003971121}>)
40: ((SB-PCL::FAST-METHOD CLIM:MAP-OVER-SHEETS (T CLIM:BASIC-SHEET))
     #<unavailable argument>
     #<unavailable argument>
     #<CLOSURE (LAMBDA #) {1003903B49}>
     #<CLIM-INTERNALS::BORDER-PANE "(Unnamed Pane)" {100398AA51}>)
41: ((SB-PCL::FAST-METHOD CLIM:MAP-OVER-SHEETS (T CLIM:BASIC-SHEET))
     #<unavailable argument>
     #<unavailable argument>
     #<CLOSURE (LAMBDA #) {1003903B49}>
     #<CLIM-TAB-LAYOUT:TAB-LAYOUT-PANE BEIRC::QUERY {100398A571}>)
42: ((SB-PCL::FAST-METHOD CLIM:MAP-OVER-SHEETS (T CLIM:BASIC-SHEET))
     #<unavailable argument>
     #<unavailable argument>
     #<CLOSURE (LAMBDA #) {1003903B49}>
     #<CLIM:VRACK-PANE "(Unnamed Pane)" {1003289351}>)
43: ((SB-PCL::FAST-METHOD CLIM:MAP-OVER-SHEETS (T CLIM:BASIC-SHEET))
     #<unavailable argument>
     #<unavailable argument>
     #<CLOSURE (LAMBDA #) {1003903B49}>
     #<CLIM:VRACK-PANE "(Unnamed Pane)" {1003233771}>)
44: ((SB-PCL::FAST-METHOD CLIM:MAP-OVER-SHEETS (T CLIM:BASIC-SHEET))
     #<unavailable argument>
     #<unavailable argument>
     #<CLOSURE (LAMBDA #) {1003903B49}>
     #<CLIM-INTERNALS::TOP-LEVEL-SHEET-PANE CLIM-INTERNALS::TOP-LEVEL-SHEET
       {1007A39561}>)
45: ((SB-PCL::FAST-METHOD CLIM:HANDLE-EVENT (BEIRC:BEIRC BEIRC::FOO-EVENT))
     #<unavailable argument>
     #<unavailable argument>
     #<BEIRC:BEIRC {100304D5C1}>
     #<BEIRC::FOO-EVENT {1002BEA581}>)
46: (CLIM-INTERNALS::HANDLE-NON-STREAM-EVENT
     #<CLIM-INTERNALS::PORT-EVENT-QUEUE {100319B661}>)
47: ((SB-PCL::FAST-METHOD CLIM:STREAM-INPUT-WAIT
      (CLIM:STANDARD-EXTENDED-INPUT-STREAM))
     #<unavailable argument>
     #<unavailable argument>
     #<CLIM:INTERACTOR-PANE BEIRC::IO {10036599A1}>)[:EXTERNAL]
48: ((SB-PCL::FAST-METHOD CLIM:STREAM-READ-GESTURE
      (CLIM:STANDARD-EXTENDED-INPUT-STREAM))
     #<unavailable argument>
     #<unavailable argument>
     #<CLIM:INTERACTOR-PANE BEIRC::IO {10036599A1}>)[:EXTERNAL]
49: ((LAMBDA
         (SB-PCL::.PV. SB-PCL::.NEXT-METHOD-CALL. SB-PCL::.ARG0.
SB-INT:&MORE
          SB-PCL::.DFUN-MORE-CONTEXT. SB-PCL::.DFUN-MORE-COUNT.))
     #<unused argument>
     #<unused argument>
     #<CLIM:INTERACTOR-PANE BEIRC::IO {10036599A1}>
     17592162813599
     10)
50: ((SB-PCL::FAST-METHOD CLIM:STREAM-READ-GESTURE :AROUND
      (CLIM-INTERNALS::DEAD-KEY-MERGING-MIXIN))
     #(1 NIL 2 NIL 0 NIL)
     #S(SB-PCL::FAST-METHOD-CALL
        :FUNCTION #<CLOSURE # {1009B59349}>
        :PV NIL
        :NEXT-METHOD-CALL NIL
        :ARG-INFO (1 . T))
     #<CLIM:INTERACTOR-PANE BEIRC::IO {10036599A1}>)[:EXTERNAL]
51: ((SB-PCL::FAST-METHOD CLIM:STREAM-READ-GESTURE
      (DREI:DREI-INPUT-EDITING-MIXIN))
     #<unavailable argument>
     #<unavailable argument>
     #<CLIM:STANDARD-INPUT-EDITING-STREAM {1003CDF2A1}>)[:EXTERNAL]
52: ((LAMBDA (STREAM)) #<CLIM:STANDARD-INPUT-EDITING-STREAM {1003CDF2A1}>)
53: (CLIM-INTERNALS::INPUT-EDITING-RESCAN-LOOP
     #<CLIM:STANDARD-INPUT-EDITING-STREAM {1003CDF2A1}>
     #<CLOSURE (LAMBDA #) {1003CDF229}>)
54: ((SB-PCL::FAST-METHOD CLIM-INTERNALS::INVOKE-WITH-INPUT-EDITING :AROUND
      (T T T T T))
     #<unavailable argument>
     #S(SB-PCL::FAST-METHOD-CALL
        :FUNCTION #<FUNCTION #>
        :PV NIL
        :NEXT-METHOD-CALL #S(SB-PCL::FAST-METHOD-CALL
                             :FUNCTION #
                             :PV NIL
                             :NEXT-METHOD-CALL NIL
                             :ARG-INFO (5))
        :ARG-INFO (5))
     #<CLIM:STANDARD-INPUT-EDITING-STREAM {1003CDF2A1}>
     #<CLOSURE (LAMBDA #) {1003CE6BB9}>
     NIL
     ""
     CLIM:STANDARD-INPUT-EDITING-STREAM)
55: ((SB-PCL::FAST-METHOD CLIM-INTERNALS::INVOKE-WITH-INPUT-EDITING
      (CLIM:CLIM-STREAM-PANE T T T T))
     #<unavailable argument>
     #<unavailable argument>
     #<CLIM:INTERACTOR-PANE BEIRC::IO {10036599A1}>
     #<CLOSURE (LAMBDA #) {1003CDF229}>
     NIL
     ""
     CLIM:STANDARD-INPUT-EDITING-STREAM)
56: ((SB-PCL::FAST-METHOD CLIM-INTERNALS::INVOKE-WITH-INPUT-EDITING :AROUND
      (T T T T T))
     #<unavailable argument>
     #S(SB-PCL::FAST-METHOD-CALL
        :FUNCTION #<FUNCTION #>
        :PV NIL
        :NEXT-METHOD-CALL #S(SB-PCL::FAST-METHOD-CALL
                             :FUNCTION #
                             :PV NIL
                             :NEXT-METHOD-CALL NIL
                             :ARG-INFO (5))
        :ARG-INFO (5))
     #<CLIM:INTERACTOR-PANE BEIRC::IO {10036599A1}>
     #<CLOSURE (LAMBDA #) {1003CDF229}>
     NIL
     ""
     CLIM:STANDARD-INPUT-EDITING-STREAM)
57: ((SB-PCL::FAST-METHOD CLIM-INTERNALS::INVOKE-WITH-INPUT-EDITING :AROUND
      (CLIM:EXTENDED-OUTPUT-STREAM T T T T))
     #<unavailable argument>
     #S(SB-PCL::FAST-METHOD-CALL
        :FUNCTION #<FUNCTION #>
        :PV NIL
        :NEXT-METHOD-CALL #S(SB-PCL::FAST-METHOD-CALL
                             :FUNCTION #
                             :PV NIL
                             :NEXT-METHOD-CALL #S(SB-PCL::FAST-METHOD-CALL
                                                  :FUNCTION #
                                                  :PV NIL
                                                  :NEXT-METHOD-CALL NIL
                                                  :ARG-INFO (5))
                             :ARG-INFO (5))
        :ARG-INFO (5))
     #<CLIM:INTERACTOR-PANE BEIRC::IO {10036599A1}>
     #<CLOSURE (LAMBDA #) {1003CDF229}>
     NIL
     ""
     CLIM:STANDARD-INPUT-EDITING-STREAM)
58: ((SB-PCL::FAST-METHOD CLIM:READ-FRAME-COMMAND (BEIRC:BEIRC))
     #<unavailable argument>
     #<unavailable argument>
     #<BEIRC:BEIRC {100304D5C1}>)[:EXTERNAL]
59: ((SB-PCL::FAST-METHOD CLIM:READ-FRAME-COMMAND :AROUND
      (CLIM:APPLICATION-FRAME))
     #<unavailable argument>
     #S(SB-PCL::FAST-METHOD-CALL
        :FUNCTION #<FUNCTION #>
        :PV NIL
        :NEXT-METHOD-CALL #S(SB-PCL::FAST-METHOD-CALL
                             :FUNCTION #
                             :PV NIL
                             :NEXT-METHOD-CALL NIL
                             :ARG-INFO (1 . T))
        :ARG-INFO (1 . T))
     #<BEIRC:BEIRC {100304D5C1}>)[:EXTERNAL]
60: ((SB-PCL::FAST-METHOD CLIM:DEFAULT-FRAME-TOP-LEVEL
      (CLIM:APPLICATION-FRAME))
     #<unavailable argument>
     #<unavailable argument>
     #<BEIRC:BEIRC {100304D5C1}>)[:EXTERNAL]
61: ((SB-PCL::FAST-METHOD CLIM:RUN-FRAME-TOP-LEVEL (CLIM:APPLICATION-FRAME))
     #<unavailable argument>
     #<unavailable argument>
     #<BEIRC:BEIRC {100304D5C1}>)[:EXTERNAL]
62: ((SB-PCL::FAST-METHOD CLIM:RUN-FRAME-TOP-LEVEL :AROUND
      (CLIM:APPLICATION-FRAME))
     #<unavailable argument>
     #S(SB-PCL::FAST-METHOD-CALL
        :FUNCTION #<FUNCTION #>
        :PV NIL
        :NEXT-METHOD-CALL NIL
        :ARG-INFO (1 . T))
     #<BEIRC:BEIRC {100304D5C1}>)[:EXTERNAL]
63: ((LAMBDA ()))
64: ((LAMBDA ()))
65: (SB-INT:SIMPLE-EVAL-IN-LEXENV
     (WITH-APPLICATION NIL
       (BEIRC:BEIRC :NEW-PROCESS NIL))
     #<NULL-LEXENV>)
66: (SB-FASL::LOAD-AS-SOURCE
     #<SB-SYS:FD-STREAM for "file /home/sly/src/clbuild/clbuild.lisp"
       {1002E1C681}>
     NIL
     NIL)
67: ((FLET SB-FASL::LOAD-STREAM)
     #<SB-SYS:FD-STREAM for "file /home/sly/src/clbuild/clbuild.lisp"
       {1002E1C681}>
     NIL)
68: (LOAD "/home/sly/src/clbuild/clbuild.lisp")[:EXTERNAL]
69: (SB-INT:SIMPLE-EVAL-IN-LEXENV
     (LOAD "/home/sly/src/clbuild/clbuild.lisp")
     #<NULL-LEXENV>)
70: (SB-IMPL::PROCESS-EVAL/LOAD-OPTIONS
     ((:EVAL . "(require :asdf)")
      (:EVAL
       . "(setq asdf:*central-registry*
'(#p\"/home/sly/src/clbuild/systems/\"))")
      (:EVAL . "nil")
      (:EVAL . "(load \"/home/sly/src/clbuild/clbuild.lisp\")")))
71: (SB-IMPL::TOPLEVEL-INIT)
72: ((LABELS SB-IMPL::RESTART-LISP))

[mcclim-devel] beirc bug report

Cyrus Harmon