From ch-mcclim at bobobeach.com  Wed Jun 16 04:15:23 2010
From: ch-mcclim at bobobeach.com (Cyrus Harmon)
Date: Tue, 15 Jun 2010 21:15:23 -0700
Subject: [mcclim-devel] beirc bug report
Message-ID: <4C184FDB.9060103@bobobeach.com>

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))



From ch-mcclim at bobobeach.com  Wed Jun 16 06:33:17 2010
From: ch-mcclim at bobobeach.com (Cyrus Harmon)
Date: Tue, 15 Jun 2010 23:33:17 -0700
Subject: [mcclim-devel] clim-gtkairo problems
Message-ID: <4C18702D.1050905@bobobeach.com>

I've been having trouble trying to get the clim-gtkairo backend working 
of late. The main application I'm working on throws an error, only with 
the gtkairo backend, but I don't have a nice simple test case for it 
yet. In the course of trying to generate such testcase, I figured I'd 
try the demodemo and see how it works with clim-gtkairo. Unfortunately, 
it seems to have some problems. The most obvious problem is that the 
initial demodemo window is completely blank until one drags the mouse 
over all of the buttons. With the clx backend, everything is fine. 
Anyone else seeing this?

thanks,

Cyrus




From ch-mcclim at bobobeach.com  Wed Jun 16 06:44:53 2010
From: ch-mcclim at bobobeach.com (Cyrus Harmon)
Date: Tue, 15 Jun 2010 23:44:53 -0700
Subject: [mcclim-devel] clim-gtkairo problems
In-Reply-To: <4C18702D.1050905@bobobeach.com>
References: <4C18702D.1050905@bobobeach.com>
Message-ID: <4C1872E5.3060903@bobobeach.com>

Hmm... perhaps I was mistaken. I'm able to see some redraw-related 
problems with the CLX backend as well. In particular, covering up the 
window with another window, and then exposing it by removing the other 
window show a blank (grey) window until I mouse over it at which point 
it redraws. So perhaps this is a general mcclim issue, not just a 
clim-gtkairo issue.

cyrus

On 06/15/2010 11:33 PM, Cyrus Harmon wrote:
> I've been having trouble trying to get the clim-gtkairo backend working
> of late. The main application I'm working on throws an error, only with
> the gtkairo backend, but I don't have a nice simple test case for it
> yet. In the course of trying to generate such testcase, I figured I'd
> try the demodemo and see how it works with clim-gtkairo. Unfortunately,
> it seems to have some problems. The most obvious problem is that the
> initial demodemo window is completely blank until one drags the mouse
> over all of the buttons. With the clx backend, everything is fine.
> Anyone else seeing this?
>
> thanks,
>
> Cyrus
>
>
> _______________________________________________
> mcclim-devel mailing list
> mcclim-devel at common-lisp.net
> http://common-lisp.net/cgi-bin/mailman/listinfo/mcclim-devel




From csr21 at cantab.net  Wed Jun 16 09:02:39 2010
From: csr21 at cantab.net (Christophe Rhodes)
Date: Wed, 16 Jun 2010 10:02:39 +0100
Subject: [mcclim-devel] beirc bug report
In-Reply-To: <4C184FDB.9060103@bobobeach.com> (Cyrus Harmon's message of "Tue, 
	15 Jun 2010 21:15:23 -0700")
References: <4C184FDB.9060103@bobobeach.com>
Message-ID: <878w6f4afk.fsf@cantab.net>

Cyrus Harmon <ch-mcclim at bobobeach.com> writes:

> 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.

McCLIM has a launchpad.

> 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)

I think the default CLX translation function from characters to font
indices only copes with ascii; the one provided in the CLIM-CLX backend
only copes with iso8859-1.  These days, a Unicode (iso10646-1) default
would probably be more sensible, yes.

Cheers,

Christophe