Re: [STUMP] Problem with tightvnc

[Kresimir Kumericki]

On (20 Oct 21:36), Shawn wrote:
> Bleh. Try this instead:
> (stumpwm::print-backtrace)

Yep. Here it goes:

------------------------------------------------------------------------  

*** - unknown character set "ISO-10646-1"
The following restarts are available:
QUIT-STUMPWM   :R1      Quit Stumpwm
ABORT          :R2      Abort main loop
Break 1 STUMPWM-USER[7]> (stumpwm::print-backtrace)
<1/172> #<SYSTEM-FUNCTION EXT:SHOW-STACK> 3
<2/168> #<COMPILED-FUNCTION STUMPWM::PRINT-BACKTRACE>
[166] EVAL frame for form (STUMPWM::PRINT-BACKTRACE)
- #<IO TERMINAL-STREAM>
<3/163> #<SYSTEM-FUNCTION SYSTEM::READ-EVAL-PRINT> 2
<4/160> #<COMPILED-FUNCTION SYSTEM::BREAK-LOOP-2-3>
[160] frame binding environments
  VAR_ENV <--> NIL
  FUN_ENV <--> NIL
  BLOCK_ENV <--> NIL
  GO_ENV <--> NIL
  DECL_ENV <--> ((DECLARATION XLIB::CLX-VALUES VALUES OPTIMIZE DECLARATION))
<5/156> #<SYSTEM-FUNCTION SYSTEM::SAME-ENV-AS> 2
[151] compiled tagbody frame for #(NIL)
- 
#(#(#(NIL NIL #<SIMPLE-ERROR #x0003343462A0> NIL) "Break 1 STUMPWM-USER[7]> "
    ("
Commands may be abbreviated as shown in the second column.
COMMAND        ABBR     DESCRIPTION
Help           :h, ?    this command list
Error          :e       Print the last error message
Inspect        :i       Inspect the last error
Abort          :a       abort to the next recent input loop
Unwind         :uw      abort to the next recent input loop
Reset          :re      toggle *PACKAGE* and *READTABLE* between the
                          local bindings and the sane values
Quit           :q       quit to the top-level input loop
Where          :w       inspect this frame
Up             :u       go up one frame, inspect it
Top            :t       go to top frame, inspect it
Down           :d       go down one frame, inspect it
Bottom         :b       go to bottom (most recent) frame, inspect it
Mode mode      :m       set stack mode for Backtrace: 1=all the stack elements
             2=all the frames                         3=only lexical frames
             4=only EVAL and APPLY frames (default)   5=only APPLY frames
Frame-limit n  :fl      set the frame-limit for Backtrace. This many frames
                          will be printed in a backtrace at most.
Backtrace [mode [limit]] :bt  inspect the stack
Break+         :br+     set breakpoint in EVAL frame
Break-         :br-     disable breakpoint in EVAL frame
Redo           :rd      re-evaluate form in EVAL frame
Return value   :rt      leave EVAL frame, prescribing the return values"
     ("Help" . #<COMPILED-FUNCTION SYSTEM::DEBUG-HELP>)
     (":h" . #<COMPILED-FUNCTION SYSTEM::DEBUG-HELP>)
     ("?" . #<COMPILED-FUNCTION SYSTEM::DEBUG-HELP>)
     ("Error" . #<COMPILED-FUNCTION SYSTEM::DEBUG-PRINT-ERROR>)
     (":e" . #<COMPILED-FUNCTION SYSTEM::DEBUG-PRINT-ERROR>)
     ("Inspect" . #<COMPILED-FUNCTION SYSTEM::DEBUG-INSPECT-ERROR>)
     (":i" . #<COMPILED-FUNCTION SYSTEM::DEBUG-INSPECT-ERROR>)
     ("Abort" . #<COMPILED-FUNCTION SYSTEM::DEBUG-UNWIND>)
     (":a" . #<COMPILED-FUNCTION SYSTEM::DEBUG-UNWIND>)
     ("Unwind" . #<COMPILED-FUNCTION SYSTEM::DEBUG-UNWIND>)
     (":uw" . #<COMPILED-FUNCTION SYSTEM::DEBUG-UNWIND>)
     ("Reset" . #<COMPILED-FUNCTION SYSTEM::DEBUG-RESET-IO>)
     (":re" . #<COMPILED-FUNCTION SYSTEM::DEBUG-RESET-IO>)
     ("Quit" . #<COMPILED-FUNCTION SYSTEM::DEBUG-QUIT>)
     (":q" . #<COMPILED-FUNCTION SYSTEM::DEBUG-QUIT>)
     ("Where" . #<COMPILED-FUNCTION SYSTEM::DEBUG-WHERE>)
     (":w" . #<COMPILED-FUNCTION SYSTEM::DEBUG-WHERE>)
     ("Up" . #<COMPILED-FUNCTION SYSTEM::DEBUG-UP>)
     (":u" . #<COMPILED-FUNCTION SYSTEM::DEBUG-UP>)
     ("Top" . #<COMPILED-FUNCTION SYSTEM::DEBUG-TOP>)
     (":t" . #<COMPILED-FUNCTION SYSTEM::DEBUG-TOP>)
     ("Down" . #<COMPILED-FUNCTION SYSTEM::DEBUG-DOWN>)
     (":d" . #<COMPILED-FUNCTION SYSTEM::DEBUG-DOWN>)
     ("Bottom" . #<COMPILED-FUNCTION SYSTEM::DEBUG-BOTTOM>)
     (":b" . #<COMPILED-FUNCTION SYSTEM::DEBUG-BOTTOM>)
     ("Mode" . #<COMPILED-FUNCTION SYSTEM::DEBUG-MODE>)
     (":m" . #<COMPILED-FUNCTION SYSTEM::DEBUG-MODE>)
     ("Frame-limit" . #<COMPILED-FUNCTION SYSTEM::DEBUG-FRAME-LIMIT>)
     (":fl" . #<COMPILED-FUNCTION SYSTEM::DEBUG-FRAME-LIMIT>)
     ("Backtrace" . #<COMPILED-FUNCTION SYSTEM::DEBUG-BACKTRACE>)
     (":bt" . #<COMPILED-FUNCTION SYSTEM::DEBUG-BACKTRACE>)
     ("Break+" . #<COMPILED-FUNCTION SYSTEM::DEBUG-TRAP-ON>)
     (":br+" . #<COMPILED-FUNCTION SYSTEM::DEBUG-TRAP-ON>)
     ("Break-" . #<COMPILED-FUNCTION SYSTEM::DEBUG-TRAP-OFF>)
     (":br-" . #<COMPILED-FUNCTION SYSTEM::DEBUG-TRAP-OFF>)
     ("Redo" . #<COMPILED-FUNCTION SYSTEM::DEBUG-REDO>)
     (":rd" . #<COMPILED-FUNCTION SYSTEM::DEBUG-REDO>)
     ("Return" . #<COMPILED-FUNCTION SYSTEM::DEBUG-RETURN>)
     (":rt" . #<COMPILED-FUNCTION SYSTEM::DEBUG-RETURN>)
     "
The following restarts are available:"
     "
QUIT-STUMPWM   :R1      Quit Stumpwm"
     (":R1" . #<COMPILED-FUNCTION SYSTEM::BREAK-LOOP-1>)
     ("QUIT-STUMPWM" . #<COMPILED-FUNCTION SYSTEM::BREAK-LOOP-1>)
     "
ABORT          :R2      Abort main loop"
     (":R2" . #<COMPILED-FUNCTION SYSTEM::BREAK-LOOP-1>)
     ("ABORT" . #<COMPILED-FUNCTION SYSTEM::BREAK-LOOP-1>)))
  NIL)
- #<COMPILED-FUNCTION SYSTEM::BREAK-LOOP-2>
<6/142> #<COMPILED-FUNCTION SYSTEM::BREAK-LOOP-2>
- #<COMPILED-FUNCTION SYSTEM::BREAK-LOOP-2>
<7/140> #<SYSTEM-FUNCTION SYSTEM::DRIVER>
[136] frame binding variables (~ = dynamically):
  | ~ SYSTEM::*SAVED-DEBUG-PACKAGE* <--> #<PACKAGE COMMON-LISP-USER>
[130] frame binding variables (~ = dynamically):
  | ~ SYSTEM::*STACK-MODE* <--> 4
[124] frame binding variables (~ = dynamically):
  | ~ SYSTEM::*FRAME-LIMIT-DOWN* <--> NIL
[118] frame binding variables (~ = dynamically):
  | ~ *STANDARD-INPUT* <--> #<IO SYNONYM-STREAM *TERMINAL-IO*>
[114] frame binding variables (~ = dynamically):
  | ~ SYSTEM::*BREAK-COUNT* <--> 0
[110] compiled tagbody frame for #(EXT:QUIT SYSTEM::ABORT-TO-TOP SYSTEM::UNWIND)
- 618
- 
("
The following restarts are available:"
 "
QUIT-STUMPWM   :R1      Quit Stumpwm"
 (":R1" . #<COMPILED-FUNCTION SYSTEM::BREAK-LOOP-1>)
 ("QUIT-STUMPWM" . #<COMPILED-FUNCTION SYSTEM::BREAK-LOOP-1>)
 "
ABORT          :R2      Abort main loop"
 (":R2" . #<COMPILED-FUNCTION SYSTEM::BREAK-LOOP-1>)
 ("ABORT" . #<COMPILED-FUNCTION SYSTEM::BREAK-LOOP-1>))
- #(NIL NIL #<SIMPLE-ERROR #x0003343462A0> NIL)
- T
- NIL
<8/100> #<COMPILED-FUNCTION SYSTEM::BREAK-LOOP>
<9/97> #<SYSTEM-FUNCTION INVOKE-DEBUGGER> 1
[96] frame binding variables (~ = dynamically):
  | ~ SYSTEM::*PRIN-STREAM* <--> #<UNBOUND>
[90] frame binding variables (~ = dynamically):
  | ~ *PRINT-ESCAPE* <--> T
- 32
- #<UNBOUND>
<10/87> #<SYSTEM-FUNCTION EXT:MAKE-ENCODING> 4
- 
#<XLIB:FONT
  localhost -xos4-terminus-bold-r-normal--16-160-72-72-c-80-iso10646-1 
#x00800009
  #x0003343428A8>
<11/81> #<ADD-ON-SYSTEM-FUNCTION XLIB:FONT-DESCENT> 1
- #<COMPILED-FUNCTION STUMPWM::RENDER-STRINGS>
- NIL
- 0
- 
#S(STUMPWM::CCONTEXT
   :WIN #<XLIB:WINDOW 1x1+0+0 localhost #x00800004 #x00033433E4B0>
   :GC #<XLIB:GCONTEXT #x00033433EA68> :DEFAULT-FG 16776960
   :DEFAULT-BRIGHT 16777024 :DEFAULT-BG 0)
<12/79> #<COMPILED-FUNCTION STUMPWM::RENDER-STRINGS>
- #<COMPILED-FUNCTION STUMPWM::ECHO-STRING-LIST>
- ("^2*Welcome to The ^BStump^b ^BW^bindow ^BM^banager!")
<13/71> #<COMPILED-FUNCTION STUMPWM::ECHO-STRING-LIST>
- #<COMPILED-FUNCTION ECHO-STRING>
- #S<screen #<XLIB:SCREEN #x00033433D868>>
<14/67> #<COMPILED-FUNCTION ECHO-STRING>
- ("^2*Welcome to The ^BStump^b ^BW^bindow ^BM^banager!")
<15/64> #<COMPILED-FUNCTION MESSAGE>
- #P"/home/kkumer/.stumpwmrc"
- T
[56] frame binding variables (~ = dynamically):
  | ~ *INITIALIZING* <--> NIL
[51] frame binding variables (~ = dynamically):
  | ~ SYSTEM::*ACTIVE-RESTARTS* <--> 
(#S(RESTART :NAME ABORT :TEST #<COMPILED-FUNCTION SYSTEM::DEFAULT-RESTART-TEST>
    :INVOKE-TAG NIL :INVOKE-FUNCTION #<COMPILED-FUNCTION SYSTEM::MAIN-LOOP-1-1>
    :REPORT #<COMPILED-FUNCTION SYSTEM::MAIN-LOOP-1-2>
    :INTERACTIVE #<COMPILED-FUNCTION SYSTEM::DEFAULT-RESTART-INTERACTIVE>
    :MEANINGFULP T))
- :LOCAL
- 1
- #<COMPILED-FUNCTION STUMPWM::STUMPWM-INTERNAL>
<16/40> #<COMPILED-FUNCTION STUMPWM::STUMPWM-INTERNAL>
[39] catch frame for tag :TOP-LEVEL
- ":1.0"
<17/35> #<COMPILED-FUNCTION STUMPWM>
[33] EVAL frame for form (STUMPWM)
- #<IO TERMINAL-STREAM>
<18/30> #<SYSTEM-FUNCTION SYSTEM::READ-EVAL-PRINT> 2
[25] compiled tagbody frame for #(NIL)
- #(NIL NIL)
18
Break 1 STUMPWM-USER[7]>
------------------------------------------------------------------------