Re: [STUMP] the value nil is not of type stumpwm:screen

[Brian Zwahr]

After a couple of updates to lisp-related pacakges, I now get the following error instead of the "value nil not type screen" error:

address@hidden ~ $ stumpwm
unhandled SIMPLE-ERROR in thread #<SB-THREAD:THREAD "initial thread" RUNNING {B3
889A9}>:                                                                       
  There is no applicable method for the generic function
    #<STANDARD-GENERIC-FUNCTION STUMPWM::SCREEN-MESSAGE-CC (1)>
  when called with arguments
    (NIL).

0: (SB-DEBUG::MAP-BACKTRACE #<CLOSURE (LAMBDA #) {B62829D}>)[:EXTERNAL]
1: (BACKTRACE 128 #<SYNONYM-STREAM :SYMBOL SB-SYS:*STDERR* {908E951}>)
2: (SB-DEBUG::DEBUGGER-DISABLED-HOOK
    #<SIMPLE-ERROR {B61F4A1}>
    #<unavailable argument>)
3: (INVOKE-DEBUGGER #<SIMPLE-ERROR {B61F4A1}>)
4: (ERROR
    "~@<There is no applicable method for the generic function ~2I~_~S~
          ~I~_when called with arguments ~2I~_~S.~:>")[:EXTERNAL]
5: ((SB-PCL::FAST-METHOD NO-APPLICABLE-METHOD (T))
    #<unavailable argument>
    #<unavailable argument>
    #<STANDARD-GENERIC-FUNCTION STUMPWM::SCREEN-MESSAGE-CC (1)>)[:EXTERNAL]
6: (STUMPWM::ECHO-STRING-LIST
    NIL
    ("Caught Asynchronous X Error: XLIB:NAME-ERROR (:ASYNCHRONOUS T :CURRENT-SEQ
UENCE"                                                                         
     "                                              31 :MAJOR 45 :MINOR 0 :SEQUE
NCE"                                                                           
     "                                              30)"))[:EXTERNAL]
7: (XLIB::REPORT-ERROR
    #<XLIB:DISPLAY :0 (The X.Org Foundation R10603901)>
    15
    XLIB:NAME-ERROR)[:EXTERNAL]
8: (XLIB::READ-ERROR-INPUT
    #<XLIB:DISPLAY :0 (The X.Org Foundation R10603901)>
    30
    #S(XLIB::REPLY-BUFFER
       :SIZE 32
       :IBUF8 #(0 15 30 0 6 0 96 0 0 0 45 0 0 0 0 0 200 232 26 9 56 0 0 0 3 31
                186 183 244 239 29 8)
       :NEXT NIL
       :DATA-SIZE 32)
    #<SB-THREAD:THREAD "initial thread" RUNNING {B3889A9}>)
9: (XLIB::READ-INPUT
    #<XLIB:DISPLAY :0 (The X.Org Foundation R10603901)>
    NIL
    NIL
    #<FUNCTION (LAMBDA #) {A799365}>)[:EXTERNAL]
10: (XLIB::READ-REPLY #<unavailable argument> #<unavailable argument>)
11: (XLIB::QUERY-FONT #<XLIB:FONT 9x15bold :0 6291462>)
12: (XLIB:OPEN-FONT
     #<XLIB:DISPLAY :0 (The X.Org Foundation R10603901)>
     "9x15bold")
13: (STUMPWM::INIT-SCREEN #<XLIB:SCREEN :0.0 1920x1200x24 TRUE-COLOR> 0 "")
14: (STUMPWM::STUMPWM-INTERNAL ":0")
15: (STUMPWM:STUMPWM ":0")
16: (SB-INT:SIMPLE-EVAL-IN-LEXENV (STUMPWM:STUMPWM ":0") #<NULL-LEXENV>)
17: (SB-IMPL::PROCESS-EVAL/LOAD-OPTIONS ((:EVAL . "(stumpwm:stumpwm \":0\")")))
18: (SB-IMPL::TOPLEVEL-INIT)
19: ((LABELS SB-IMPL::RESTART-LISP))

unhandled condition in --disable-debugger mode, quitting

On Wed, Jul 29, 2009 at 1:42 PM, Brian Zwahr <address@hidden> wrote:

After (require 'clx) was lots of compilation (first time I guess), so I closed/reopened sbcl and got this:

address@hidden ~ $ sbcl
This is SBCL 1.0.30.gentoo-r0, an implementation of ANSI Common Lisp.
More information about SBCL is available at <http://www.sbcl.org/>.

SBCL is free software, provided as is, with absolutely no warranty.
It is mostly in the public domain; some portions are provided under
BSD-style licenses.  See the CREDITS and COPYING files in the
distribution for more information.
; loading system definition from
; /usr/share/common-lisp/systems/asdf-binary-locations.asd into
; #<PACKAGE "ASDF0">
; registering #<SYSTEM ASDF-BINARY-LOCATIONS {ADF4111}> as ASDF-BINARY-LOCATIONS
* (require 'clx)

; loading system definition from
; /usr/lib/sbcl/sb-bsd-sockets/sb-bsd-sockets.asd into #<PACKAGE "ASDF0">
; registering #<SYSTEM SB-BSD-SOCKETS {AB11D69}> as SB-BSD-SOCKETS
; registering #<SYSTEM SB-BSD-SOCKETS-TESTS {AD37D19}> as SB-BSD-SOCKETS-TESTS
("SB-GROVEL" "SB-BSD-SOCKETS")
* (let ((display (xlib:open-default-display))) (prog1 (xlib:list-font-names display "*" :max-fonts 1) (xlib:close-display display)))

("-adobe-courier-bold-o-normal--8-80-75-75-m-50-iso8859-1")
*

On Wed, Jul 29, 2009 at 12:35 PM, Shawn Betts <address@hidden> wrote:

On Wed, Jul 29, 2009 at 9:25 AM, Brian Zwahr<address@hidden> wrote:
> Yes, sbcl.

Can you post the output from:

(require 'clx)
(let ((display (xlib:open-default-display))) (prog1
(xlib:list-font-names display "*" :max-fonts 1) (xlib:close-display
display)))

In sbcl.

-Shawn