[STUMP] stumpwm won't start on OpenBSD macppc/sbcl

[Solène RAPENNE]

Hello,

I am a happy user of stumpwm. I wanted to use it on a macppc running
OpenBSD current (the version which will become the next release), built
with sbcl 1.3.10. The same combination on OpenBSD/amd64/sbcl works,
while it doesn't work with the macppc and I don't see any reason it
won't run. Maybe X is missing some parts ? I'm not sure accelerated
graphics works...

I tried stumpwm 0.9.9 and the git code.

Please find a backtrace of the problem, if you have any clue :-)

./stumpwm
 
debugger invoked on a SIMPLE-ERROR:
  There is no applicable method for the generic function
    #<STANDARD-GENERIC-FUNCTION STUMPWM::SCREEN-MESSAGE-CC (1)>
  when called with arguments
    (NIL).
 
Type HELP for debugger help, or (SB-EXT:EXIT) to exit from SBCL.
 
restarts (invokable by number or by possibly-abbreviated name):
  0: [RETRY       ] Retry calling the generic function.
  1: [QUIT-STUMPWM] Quit Stumpwm
 
((:METHOD NO-APPLICABLE-METHOD (T)) #<STANDARD-GENERIC-FUNCTION 
STUMPWM::SCREEN-MESSAGE-CC (1)> NIL) [fast-method]
0] :BACKTRACE
 
Backtrace for: #<SB-THREAD:THREAD "main thread" RUNNING {51C80009}>
0: ((:METHOD NO-APPLICABLE-METHOD (T)) #<STANDARD-GENERIC-FUNCTION 
STUMPWM::SCREEN-MESSAGE-CC (1)> NIL) [fast-method]
1: (SB-PCL::CALL-NO-APPLICABLE-METHOD #<STANDARD-GENERIC-FUNCTION 
STUMPWM::SCREEN-MESSAGE-CC (1)> (NIL))
2: (STUMPWM::ECHO-STRING-LIST NIL ("Caught Asynchronous X Error: 
XLIB:ID-CHOICE-ERROR (:ASYNCHRONOUS T" "                                        
           :CURRENT-SEQUENCE 27" "                                              
     :RESOURCE-ID 62914561 :MAJOR" "                                            
       45 :MINOR 0 :SEQUENCE 26)"))
3: (XLIB::READ-ERROR-INPUT #<XLIB:DISPLAY :0 (The X.Org Foundation R11804000)> 
26 #S(XLIB::REPLY-BUFFER :SIZE 32 :IBUF8 #(0 14 0 26 3 192 0 1 0 0 45 0 ...) 
:NEXT NIL :DATA-SIZE 32) #<SB-THREAD:THREAD "main thread" RUNNING {51C80009}>)
4: (XLIB::READ-INPUT #<XLIB:DISPLAY :0 (The X.Org Foundation R11804000)> NIL 
NIL #<FUNCTION (LAMBDA (XLIB::PENDING-COMMAND) :IN XLIB::READ-REPLY) 
{5125B675}> #S(XLIB::PENDING-COMMAND :SEQUENCE 27 :REPLY-BUFFER NIL :PROCESS 
#<SB-THREAD:THREAD "main thread" RUNNING {51C80009}> :NEXT NIL))
5: (XLIB::READ-REPLY #<unavailable argument> #<unavailable argument>)
6: (XLIB::QUERY-FONT #<XLIB:FONT 9x15 :0 12582913>)
7: (XLIB:OPEN-FONT #<XLIB:DISPLAY :0 (The X.Org Foundation R11804000)> "9x15")
8: (STUMPWM::INIT-SCREEN #<XLIB:SCREEN :0.0 1920x1080x24 TRUE-COLOR> 0 "")
9: (STUMPWM::STUMPWM-INTERNAL ":0")
10: (STUMPWM:STUMPWM ":0")
11: ((LAMBDA NIL :IN "/home/solene/dev/stumpwm/make-image.lisp"))
12: ((FLET #:WITHOUT-INTERRUPTS-BODY-72 :IN SAVE-LISP-AND-DIE))

    13: ((LABELS SB-IMPL::RESTART-LISP :IN SAVE-LISP-AND-DIE))