[mcclim-devel] beirc bug report

Cyrus Harmon ch-mcclim at bobobeach.com
Wed Jun 16 04:15:23 UTC 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))




More information about the mcclim-devel mailing list