Oleg Pykhalov
2017-09-11 17:20:03 UTC
Hello Carlos,
I have this issue too. But I have a success to avoid by giving a
Stumpwm source from git to Quicklisp manually. I hope it will help.
I upgraded Stumpwm to stumpwm-20170830-git with Quicklisp.
--8<---------------cut here---------------start------------->8---
/home/natsu/quicklisp/dists/quicklisp/archives/
├── alexandria-20170630-git.tgz
├── alexandria-20170830-git.tgz
├── bordeaux-threads-v0.8.5.tgz
├── cl-fad-0.7.4.tgz
├── cl-ppcre-2.0.11.tgz
├── cl-store-20160531-git.tgz
├── cl-vectors-20170630-git.tgz
├── clx-20170630-git.tgz
├── clx-20170830-git.tgz
├── clx-truetype-20160825-git.tgz
├── quicklisp-slime-helper-20150709-git.tgz
├── slime-v2.19.tgz
├── slime-v2.20.tgz
├── stumpwm-20170725-git.tgz
├── stumpwm-20170830-git.tgz
├── trivial-features-20161204-git.tgz
└── zpb-ttf-1.0.3.tgz
0 directories, 17 files
--8<---------------cut here---------------end--------------->8---
After upgrade cannot start with my previous /home/natsu/.xsession
configuration file.
--8<---------------cut here---------------start------------->8---
exec sbcl --eval "(ql:quickload :stumpwm)" --eval "(stumpwm:stumpwm)"
--8<---------------cut here---------------end--------------->8---
I followed how to debug this with Xephyr from
https://github.com/stumpwm/stumpwm/wiki/Debugging-reproducible-crashing-bugs-or-when-crash-StumpWM-is-likely-to-Crash
and got these errors.
--8<---------------cut here---------------start------------->8---
There is no class named STUMPWM::STUMPWM-IDLE-TIMER-CHANNEL.
[Condition of type SB-PCL:CLASS-NOT-FOUND-ERROR]
Restarts:
0: [NEW-IO-LOOP] Recreate I/O loop
1: [QUIT-STUMPWM] Quit Stumpwm
2: [ABORT] Exit debugger, returning to top level.
Backtrace:
0: (SB-PCL::FIND-CLASS-FROM-CELL STUMPWM::STUMPWM-IDLE-TIMER-CHANNEL NIL T)
1: ((FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN SB-PCL::INSTALL-OPTIMIZED-CONSTRUCTOR))
2: ((FLET #:WITHOUT-INTERRUPTS-BODY-387 :IN SB-THREAD::CALL-WITH-RECURSIVE-LOCK))
3: (SB-THREAD::CALL-WITH-RECURSIVE-LOCK #<CLOSURE (FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN SB-PCL::INSTALL-OPTIMIZED-CONSTRUCTOR) {7FFFF2E5760B}> #<SB-THREAD:MUTEX "World Lock" owner: #<SB-THREAD:T..
4: (SB-PCL::INSTALL-OPTIMIZED-CONSTRUCTOR #<SB-PCL::CTOR STUMPWM::STUMPWM-IDLE-TIMER-CHANNEL ()>)
5: ((LAMBDA (&REST SB-PCL::ARGS) :IN SB-PCL::INSTALL-INITIAL-CONSTRUCTOR))
6: (STUMPWM::STUMPWM-INTERNAL-LOOP)
7: (STUMPWM::STUMPWM-INTERNAL ":1")
8: (STUMPWM ":1")
9: (SB-INT:SIMPLE-EVAL-IN-LEXENV (STUMPWM ":1") #<NULL-LEXENV>)
10: (EVAL (STUMPWM ":1"))
11: (SB-EXT:INTERACTIVE-EVAL (STUMPWM ":1") :EVAL NIL)
12: (SB-IMPL::REPL-FUN NIL)
13: ((LAMBDA NIL :IN SB-IMPL::TOPLEVEL-REPL))
14: (SB-IMPL::%WITH-REBOUND-IO-SYNTAX #<CLOSURE (LAMBDA NIL :IN SB-IMPL::TOPLEVEL-REPL) {10043EB48B}>)
15: (SB-IMPL::TOPLEVEL-REPL NIL)
16: (SB-IMPL::TOPLEVEL-INIT)
17: ((FLET #:WITHOUT-INTERRUPTS-BODY-82 :IN SB-EXT:SAVE-LISP-AND-DIE))
18: ((LABELS SB-IMPL::RESTART-LISP :IN SB-EXT:SAVE-LISP-AND-DIE))
--8<---------------cut here---------------end--------------->8---
* Solution
I found a helpful article how to provide a project to Quicklisp on
https://stackoverflow.com/questions/40571533/how-to-install-a-package-with-quicklisp
First of all you need to clone Stumpwm to Quicklisp local-projects.
--8<---------------cut here---------------start------------->8---
git clone https://github.com/stumpwm/stumpwm.git /home/natsu/quicklisp/local-projects/stumpwm
--8<---------------cut here---------------end--------------->8---
Then create a file /home/natsu/bin/run-stumpwm with contents:
--8<---------------cut here---------------start------------->8---
;; -*-lisp-*-
(require :asdf)
(push #p"/home/natsu/quicklisp/local-projects/stumpwm/" asdf:*central-registry*)
(ql:quickload "stumpwm")
(stumpwm:stumpwm)
--8<---------------cut here---------------end--------------->8---
And load this in /home/natsu/.xsession:
--8<---------------cut here---------------start------------->8---
exec sbcl --load /home/natsu/bin/run-stumpwm
--8<---------------cut here---------------end--------------->8---
I have this issue too. But I have a success to avoid by giving a
Stumpwm source from git to Quicklisp manually. I hope it will help.
I upgraded Stumpwm to stumpwm-20170830-git with Quicklisp.
--8<---------------cut here---------------start------------->8---
/home/natsu/quicklisp/dists/quicklisp/archives/
├── alexandria-20170630-git.tgz
├── alexandria-20170830-git.tgz
├── bordeaux-threads-v0.8.5.tgz
├── cl-fad-0.7.4.tgz
├── cl-ppcre-2.0.11.tgz
├── cl-store-20160531-git.tgz
├── cl-vectors-20170630-git.tgz
├── clx-20170630-git.tgz
├── clx-20170830-git.tgz
├── clx-truetype-20160825-git.tgz
├── quicklisp-slime-helper-20150709-git.tgz
├── slime-v2.19.tgz
├── slime-v2.20.tgz
├── stumpwm-20170725-git.tgz
├── stumpwm-20170830-git.tgz
├── trivial-features-20161204-git.tgz
└── zpb-ttf-1.0.3.tgz
0 directories, 17 files
--8<---------------cut here---------------end--------------->8---
After upgrade cannot start with my previous /home/natsu/.xsession
configuration file.
--8<---------------cut here---------------start------------->8---
exec sbcl --eval "(ql:quickload :stumpwm)" --eval "(stumpwm:stumpwm)"
--8<---------------cut here---------------end--------------->8---
I followed how to debug this with Xephyr from
https://github.com/stumpwm/stumpwm/wiki/Debugging-reproducible-crashing-bugs-or-when-crash-StumpWM-is-likely-to-Crash
and got these errors.
--8<---------------cut here---------------start------------->8---
There is no class named STUMPWM::STUMPWM-IDLE-TIMER-CHANNEL.
[Condition of type SB-PCL:CLASS-NOT-FOUND-ERROR]
Restarts:
0: [NEW-IO-LOOP] Recreate I/O loop
1: [QUIT-STUMPWM] Quit Stumpwm
2: [ABORT] Exit debugger, returning to top level.
Backtrace:
0: (SB-PCL::FIND-CLASS-FROM-CELL STUMPWM::STUMPWM-IDLE-TIMER-CHANNEL NIL T)
1: ((FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN SB-PCL::INSTALL-OPTIMIZED-CONSTRUCTOR))
2: ((FLET #:WITHOUT-INTERRUPTS-BODY-387 :IN SB-THREAD::CALL-WITH-RECURSIVE-LOCK))
3: (SB-THREAD::CALL-WITH-RECURSIVE-LOCK #<CLOSURE (FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN SB-PCL::INSTALL-OPTIMIZED-CONSTRUCTOR) {7FFFF2E5760B}> #<SB-THREAD:MUTEX "World Lock" owner: #<SB-THREAD:T..
4: (SB-PCL::INSTALL-OPTIMIZED-CONSTRUCTOR #<SB-PCL::CTOR STUMPWM::STUMPWM-IDLE-TIMER-CHANNEL ()>)
5: ((LAMBDA (&REST SB-PCL::ARGS) :IN SB-PCL::INSTALL-INITIAL-CONSTRUCTOR))
6: (STUMPWM::STUMPWM-INTERNAL-LOOP)
7: (STUMPWM::STUMPWM-INTERNAL ":1")
8: (STUMPWM ":1")
9: (SB-INT:SIMPLE-EVAL-IN-LEXENV (STUMPWM ":1") #<NULL-LEXENV>)
10: (EVAL (STUMPWM ":1"))
11: (SB-EXT:INTERACTIVE-EVAL (STUMPWM ":1") :EVAL NIL)
12: (SB-IMPL::REPL-FUN NIL)
13: ((LAMBDA NIL :IN SB-IMPL::TOPLEVEL-REPL))
14: (SB-IMPL::%WITH-REBOUND-IO-SYNTAX #<CLOSURE (LAMBDA NIL :IN SB-IMPL::TOPLEVEL-REPL) {10043EB48B}>)
15: (SB-IMPL::TOPLEVEL-REPL NIL)
16: (SB-IMPL::TOPLEVEL-INIT)
17: ((FLET #:WITHOUT-INTERRUPTS-BODY-82 :IN SB-EXT:SAVE-LISP-AND-DIE))
18: ((LABELS SB-IMPL::RESTART-LISP :IN SB-EXT:SAVE-LISP-AND-DIE))
--8<---------------cut here---------------end--------------->8---
* Solution
I found a helpful article how to provide a project to Quicklisp on
https://stackoverflow.com/questions/40571533/how-to-install-a-package-with-quicklisp
First of all you need to clone Stumpwm to Quicklisp local-projects.
--8<---------------cut here---------------start------------->8---
git clone https://github.com/stumpwm/stumpwm.git /home/natsu/quicklisp/local-projects/stumpwm
--8<---------------cut here---------------end--------------->8---
Then create a file /home/natsu/bin/run-stumpwm with contents:
--8<---------------cut here---------------start------------->8---
;; -*-lisp-*-
(require :asdf)
(push #p"/home/natsu/quicklisp/local-projects/stumpwm/" asdf:*central-registry*)
(ql:quickload "stumpwm")
(stumpwm:stumpwm)
--8<---------------cut here---------------end--------------->8---
And load this in /home/natsu/.xsession:
--8<---------------cut here---------------start------------->8---
exec sbcl --load /home/natsu/bin/run-stumpwm
--8<---------------cut here---------------end--------------->8---