[STUMP] Encoding error (SBCL)

[Julian Stecklina]

Hello,

recently I started getting these:

; compiling file "/home/julian/src/lisp/stumpwm/version.lisp" (written 21 DEC 
2009 09:18:14 PM):
; compiling (IN-PACKAGE :STUMPWM)
; compiling (EXPORT (QUOTE #))
debugger invoked on a SB-INT:C-STRING-DECODING-ERROR in thread #<THREAD 
"initial thread" RUNNING {A9AA8E1}>:
  c-string decoding error (:external-format :UTF-8):
    the octet sequence 2 cannot be decoded.

This happens with SBCL 1.0.31 and 1.0.33 (I did not try any other
versions so far). If you remove the call to run-shell-command in
version.lisp, it happens when stumpwm calls xdpyinfo on startup. Any
hints?

0: (SB-INT:C-STRING-DECODING-ERROR :UTF-8 2)
1: (SB-IMPL::READ-FROM-C-STRING/UTF-8 #.(SB-SYS:INT-SAP #XBFFFFA02) CHARACTER)
2: (SB-INT:C-STRINGS->STRING-LIST
    #<SB-ALIEN-INTERNALS:ALIEN-VALUE :SAP #XBFFFF5F4 :TYPE (*
                                                            (SB-ALIEN:C-STRING
                                                             :EXTERNAL-FORMAT
                                                             :DEFAULT
                                                             :ELEMENT-TYPE
                                                             CHARACTER))>)
3: (RUN-PROG "/bin/sh")[:EXTERNAL]
4: (RUN-PROG-COLLECT-OUTPUT "/bin/sh")[:EXTERNAL]
5: (RUN-SHELL-COMMAND "git describe" T)
6: (SB-INT:SIMPLE-EVAL-IN-LEXENV
    (RUN-SHELL-COMMAND "git describe" T)
    #<NULL-LEXENV>)
7: (SB-INT:SIMPLE-EVAL-IN-LEXENV
    (STRING-TRIM '(#\Newline) (RUN-SHELL-COMMAND "git describe" T))
    #<NULL-LEXENV>)
8: (SB-INT:SIMPLE-EVAL-IN-LEXENV
    (IF (PROBE-PATH ".git")
        (STRING-TRIM '(#\Newline) (RUN-SHELL-COMMAND "git describe" T))
        "0.9.7-git")
    #<NULL-LEXENV>)
9: (SB-INT:SIMPLE-EVAL-IN-LEXENV
    (CONCATENATE 'STRING
                 (IF (PROBE-PATH ".git")
                     (STRING-TRIM '(#\Newline)
                                  (RUN-SHELL-COMMAND "git describe" T))
                     "0.9.7-git")
                 " Compiled On "
                 (FORMAT-EXPAND *TIME-FORMAT-STRING-ALIST*
                                *TIME-FORMAT-STRING-DEFAULT*))
    #<NULL-LEXENV>)

-- 
Julian Stecklina

The day Microsoft makes something that doesn't suck is probably the day
they start making vacuum cleaners - Ernst Jan Plugge